Metrics for powComplex, real part

start0.0ms (0%)

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

analyze342.0ms (3.1%)

Memory

16.4MiB live, 263.4MiB allocated; 48ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 39 to 18 computations (53.8% saved)

sample2.2s (19.3%)

Memory

44.9MiB live, 1 725.5MiB allocated; 303ms collecting garbage

Samples

979.0ms	2 989×	1	valid
675.0ms	5 267×	0	valid

Precisions

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

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

ival-hypot: 256.0ms (19.8% of total)

ival-log: 208.0ms (16.1% of total)

ival-cos: 175.0ms (13.5% of total)

adjust: 121.0ms (9.4% of total)

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

ival-exp: 85.0ms (6.6% of total)

ival-sub!: 24.0ms (1.9% of total)

ival-add!: 23.0ms (1.8% of total)

Bogosity

explain369.0ms (3.3%)

Memory

1.0MiB live, 345.9MiB allocated; 55ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
172	-	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)))`
128	-	1	(6.200811775757079e-291 -6.767337875732619e-157 -7.032131088674065e+108 -2.2115860927450982e+220)	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`
4	-	0	-	`(*.f64 (atan2.f64 x.im x.re) y.re)`
3	-	1	(3.9771014244631505e+210 1.1708654381683484e-110 3.6312099472504274e-194 -1.3720323179922384e+162)	`(*.f64 (atan2.f64 x.im x.re) y.im)`
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	171	0
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	oflow-rescue	113	0
↳	`(*.f64 x.re x.re)`	overflow	64
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	113
↳	`(*.f64 x.im x.im)`	overflow	62
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))`	uflow-rescue	2	0
↳	`(*.f64 x.re x.re)`	underflow	70
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	underflow	14
↳	`(*.f64 x.im x.im)`	underflow	54
`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	64
↳	`(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))`	overflow	113
↳	`(.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	62
`*.f64`	`(*.f64 (atan2.f64 x.im x.re) y.re)`	*nu**	1	0

Confusion

	Predicted +	Predicted -
+	149	0
-	64	43

Precision

0.6995305164319249

Recall

1.0

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	149	0	0
-	64	0	43

Precision?

0.6995305164319249

Recall?

1.0

Freqs

test

number	freq
0	43
1	138
2	75

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

128.0ms	344×	1	valid
39.0ms	168×	0	valid

Compiler

Compiled 393 to 61 computations (84.5% saved)

Precisions

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

ival-log: 33.0ms (24.8% of total)

ival-mult!: 28.0ms (21% of total)

ival-cos: 20.0ms (15% of total)

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

adjust: 15.0ms (11.3% of total)

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

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

ival-add!: 4.0ms (3% of total)

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

preprocess82.0ms (0.7%)

Memory

-12.2MiB live, 32.0MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 3 (0.0ms)

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

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	42.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))))

Status

Accuracy

Program

▶

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

Compiler

Compiled 74 to 38 computations (48.6% saved)

series201.0ms (1.8%)

Memory

14.1MiB live, 294.0MiB allocated; 52ms collecting garbage

Counts

19 → 272

Calls

Call 1

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

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

Calls

12 calls:

Time	Variable		Point	Expression
52.0ms	y.re	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
24.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
17.0ms	x.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
15.0ms	y.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))
13.0ms	y.im	@	0	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) x.re (* x.im x.im) x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))

rewrite218.0ms (2%)

Memory

-14.8MiB live, 214.6MiB allocated; 27ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

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

Stop Event

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

Counts

291 → 338

Calls

Call 1

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

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

eval553.0ms (5%)

Memory: -57.3MiB live, 99.6MiB allocated; 975ms collecting garbage
Compiler: Compiled 32 468 to 2 856 computations (91.2% saved)

prune102.0ms (0.9%)

Memory

-10.2MiB live, 151.0MiB allocated; 21ms collecting garbage

Pruning

11 alts after pruning (10 fresh and 1 done)

	Pruned	Kept	Total
New	420	10	430
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	420	11	431

Accuracy

95.7%

Counts

431 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	76.3%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	39.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (/.f64 (-.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (.f64 (.f64 (atan2.f64 x.im x.re) y.re) (.f64 (atan2.f64 x.im x.re) y.re))) (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re)))))
✓	42.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))))
	50.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))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
▶	22.1%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
	66.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))) #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 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))))
▶	42.5%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
	24.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
▶	25.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
	32.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
▶	34.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))))

Compiler

Compiled 1 225 to 679 computations (44.6% saved)

series944.0ms (8.5%)

Memory

46.7MiB live, 1 150.4MiB allocated; 217ms collecting garbage

Counts

70 → 758

Calls

Call 1

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

Outputs
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* 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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* y.im (atan2 x.im x.re))))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (neg y.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #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 (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 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 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (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 (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* 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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* 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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))))) (sin (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log x.im))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (* -1 (log x.im)))))))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.im)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log x.im))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.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.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log 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))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (/ (- (* (pow x.im 2) (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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))))) (sin (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log -1) (log (/ 1 x.im))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (log (/ 1 x.im)))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.im)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log -1) (log (/ 1 x.im))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (log (/ 1 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #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 (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 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 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (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 (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (log (pow (/ -1 x.im) y.im))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (pow (/ -1 x.im) y.im)))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (log (pow (/ -1 x.im) y.re))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (pow (/ -1 x.im) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* 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 (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (* (log x.im) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))) (+ (* y.re (+ (* -1 (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2)))))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))) (+ (* y.re (+ (* -1 (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1/6 (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.im)) 3)) (* 1/2 (* (log (/ -1 x.im)) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2))))))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* y.re (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.im) y.im)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.im)) 3)) (* 1/2 (* (log (/ -1 x.im)) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2)))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.im))) (* -1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.im))) (* y.re (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* -1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (log (/ -1 x.im)))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.im)) (* 1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.im)) (* y.re (+ (* 1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.im)) (* y.re (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* y.re (+ (* 1/24 (* y.re (+ (* -6 (pow (log (/ -1 x.im)) 4)) (+ (* -4 (pow (log (/ -1 x.im)) 4)) (+ (* -3 (pow (log (/ -1 x.im)) 4)) (+ (* 12 (pow (log (/ -1 x.im)) 4)) (pow (log (/ -1 x.im)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 1))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (+ 1 (* y.re (log (/ -1 x.im))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.im)) (* 1/2 (* y.re (pow (log (/ -1 x.im)) 2))))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.im)) (* y.re (+ (* 1/6 (* y.re (pow (log (/ -1 x.im)) 3))) (* 1/2 (pow (log (/ -1 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (cos (* y.im (log x.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* -1 (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/4 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (+ (* -1 (* y.re (+ (* -1/6 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))) (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1/4 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))) (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* -1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)) (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2)))) (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* -1/6 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))) (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2)))) (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (* y.im (log x.im)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))) (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))) (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))))) (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))) (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.im (log x.im))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* -1 (/ (log (pow (/ -1 x.im) y.im)) y.re)) (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (log (pow (/ -1 x.im) y.im)) y.re)) (atan2 x.im x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (log (pow (/ -1 x.im) y.im)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (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)))) (* (atan2 x.im x.re) (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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 (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (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)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (* y.im (- (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))) (pow (/ -1 x.im) y.re))) (* -1 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))))) (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))) (pow (/ -1 x.im) y.re))) (+ (* -1 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (* y.im (+ (* -1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow (/ -1 x.im) y.re))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.im) y.re))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow (/ -1 x.im) y.re))))))))) (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))) (pow (/ -1 x.im) y.re))) (+ (* -1 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (* y.im (+ (* -1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow (/ -1 x.im) y.re))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.im) y.re))) (+ (* y.im (+ (* -1 (/ (* (+ (* -1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (log (/ -1 x.im)) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (pow (/ -1 x.im) y.re))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.im) y.re))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (* 1/6 (pow (log (/ -1 x.im)) 3)))) (pow (/ -1 x.im) y.re))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow (/ -1 x.im) y.re)))))))))) (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re)))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/2 (* (log (/ -1 x.im)) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (* 1/6 (pow (log (/ -1 x.im)) 3))))))))))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* -1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* y.im (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* -1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* -1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* y.im (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* -1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (log (/ -1 x.im)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.im)) (* 1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.im)) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.im)) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (/ -1 x.im)) 4)) (+ (* -4 (pow (log (/ -1 x.im)) 4)) (+ (* -3 (pow (log (/ -1 x.im)) 4)) (+ (* 12 (pow (log (/ -1 x.im)) 4)) (pow (log (/ -1 x.im)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 1))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (+ 1 (* y.im (log (/ -1 x.im))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.im)) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.im)) (* y.im (+ (* 1/6 (* y.im (pow (log (/ -1 x.im)) 3))) (* 1/2 (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (pow (/ -1 x.im) y.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* y.im (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (/ 1 (pow (/ -1 x.im) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.im) y.re))) (* 1/2 (/ (* y.im (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.im) y.re))))) (/ 1 (pow (/ -1 x.im) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.im) y.re))) (* y.im (+ (* -1/6 (/ (* y.im (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.im) y.re))) (* 1/2 (/ (pow (atan2 x.im x.re) 2) (pow (/ -1 x.im) y.re))))))) (/ 1 (pow (/ -1 x.im) y.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.im) y.re)))))
#s(approx (neg y.im) #s(hole binary64 (* -1 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/4 (/ (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* -1/6 (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (pow x.im 2)))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* y.im (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))) (* y.im (+ (* -1/4 (/ (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (pow x.im 2)))))))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)) (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))) (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* -1/6 (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (pow x.im 2))))) (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))) (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))) (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))) (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* 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 (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.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 (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (pow (/ -1 x.im) y.re)) y.im)) (* -1 (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* y.im (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) y.im) (* 1/2 (/ (* (pow x.re 2) (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)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (/ (log (pow (/ -1 x.im) y.re)) y.im) (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))

Calls

12 calls:

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

rewrite346.0ms (3.1%)

Memory

8.9MiB live, 388.8MiB allocated; 59ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	4100	53267
0	4235	51387
0	8317	47830

Stop Event

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

Counts

828 → 966

Calls

Call 1

Inputs
(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(*.f64 y.re (log.f64 x.im))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)
(/.f64 #s(literal -1 binary64) x.im)
(exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))
(neg.f64 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 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#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 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
#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))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
(-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))
(/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))
(.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
(.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* 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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* y.im (atan2 x.im x.re)) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* y.im (atan2 x.im x.re))))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (* (neg y.im) (atan2 x.im x.re)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.im (log x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #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 (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 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 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (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 (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* 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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* (pow x.re 2) (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* 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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (log x.im) #s(hole binary64 (log x.im)))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (pow x.im y.re)))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))))) (sin (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (* -1 (log x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log -1) (* -1 (log x.im))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (* -1 (log x.im)))))))
#s(approx (/ -1 x.im) #s(hole binary64 (/ -1 x.im)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.im)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (* -1 (log x.im))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log x.im))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.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.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log 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))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.im (log x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (/ (- (* (pow x.im 2) (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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))))) (sin (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (+ (log -1) (log (/ 1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log -1) (log (/ 1 x.im))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (exp (* y.im (+ (log -1) (log (/ 1 x.im)))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.im)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (+ (log -1) (log (/ 1 x.im))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log -1) (log (/ 1 x.im))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (exp (* y.re (+ (log -1) (log (/ 1 x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #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 (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 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 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (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 (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (* (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log x.im) #s(hole binary64 (+ (log -1) (* -1 (log (/ -1 x.im))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (exp (* y.re (+ (log -1) (* -1 (log (/ -1 x.im))))))))
#s(approx (* y.re (log x.im)) #s(hole binary64 (* y.re (+ (log -1) (* -1 (log (/ -1 x.im)))))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (log (pow (/ -1 x.im) y.im))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (pow (/ -1 x.im) y.im)))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (log (pow (/ -1 x.im) y.re))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (pow (/ -1 x.im) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2)))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* y.im (+ (log -1) (* -1 (log (/ -1 x.im))))) (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* 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 (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* y.im (log x.im))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log x.im) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log x.im))) (* (log x.im) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log x.im) 2) (* (sin (* y.im (log x.im))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log x.im))) (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log x.im))) (log x.im)) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log x.im))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.im (log x.im)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* -1 (* y.re (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (log x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log x.im)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log x.im) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log x.im) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log x.im) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log x.im) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 1))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (log x.im)))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* 1/2 (* y.re (pow (log x.im) 2))))))))
#s(approx (exp (* y.re (log x.im))) #s(hole binary64 (+ 1 (* y.re (+ (log x.im) (* y.re (+ (* 1/6 (* y.re (pow (log x.im) 3))) (* 1/2 (pow (log x.im) 2)))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))) (+ (* y.re (+ (* -1 (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2)))))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))) (+ (* y.re (+ (* -1 (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))))) (+ (* -1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (+ (* y.re (+ (* -1/6 (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/2 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))))) (+ (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2))) (atan2 x.im x.re)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.im)) 3)) (* 1/2 (* (log (/ -1 x.im)) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2))))))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* y.re (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.im) y.im)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (* -1 (* y.im (atan2 x.im x.re))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* -1 (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (exp (* -1 (* y.im (atan2 x.im x.re)))) (* y.re (+ (* -1 (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.re (+ (* y.re (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (+ (* -1/6 (pow (log (/ -1 x.im)) 3)) (* 1/2 (* (log (/ -1 x.im)) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))) (* (exp (* -1 (* y.im (atan2 x.im x.re)))) (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* 1/2 (pow (log (/ -1 x.im)) 2)))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.im))) (* -1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (+ (* -1 (log (/ -1 x.im))) (* y.re (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* -1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (log (/ -1 x.im)))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.im)) (* 1/2 (* y.re (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.im)) (* y.re (+ (* 1/6 (* y.re (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) #s(hole binary64 (* y.re (+ (log (/ -1 x.im)) (* y.re (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* y.re (+ (* 1/24 (* y.re (+ (* -6 (pow (log (/ -1 x.im)) 4)) (+ (* -4 (pow (log (/ -1 x.im)) 4)) (+ (* -3 (pow (log (/ -1 x.im)) 4)) (+ (* 12 (pow (log (/ -1 x.im)) 4)) (pow (log (/ -1 x.im)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 1))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (+ 1 (* y.re (log (/ -1 x.im))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.im)) (* 1/2 (* y.re (pow (log (/ -1 x.im)) 2))))))))
#s(approx (pow (/ -1 x.im) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (/ -1 x.im)) (* y.re (+ (* 1/6 (* y.re (pow (log (/ -1 x.im)) 3))) (* 1/2 (pow (log (/ -1 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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (cos (* y.im (log x.im))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* -1 (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/4 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (- (+ (cos (* y.im (log x.im))) (* y.re (- (* y.re (- (+ (* -1 (* y.re (+ (* -1/6 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))) (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))) (pow x.im 2)))))) (* -1/2 (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1/4 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* (sin (* y.im (log x.im))) (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))) (* y.re (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2))) (* y.re (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* -1/12 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (+ (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)) (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (pow x.im 2))) (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2)))) (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (pow x.im 2))) (* -1/6 (/ (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))) (pow x.im 2))))) (/ (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))) (pow x.im 2)))) (/ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (pow x.im 2)))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (* y.im (log x.im)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))) (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))))) (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))) (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* (pow x.re 2) (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))))) (* (pow x.re 2) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))) (* (pow x.re 2) (* y.im (sin (* y.im (log x.im))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.im (log x.im))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.im (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))))) (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (sin (* y.im (log x.im)))) (* y.re (+ (* y.im (* (cos (* y.im (log x.im))) (atan2 x.im x.re))) (* y.re (+ (* -1/2 (* y.im (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.im (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3))))))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.im (log x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (* (cos (* y.im (log x.im))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.im (log x.im))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log x.im))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* y.im (log x.im))) (pow (atan2 x.im x.re) 3)))))) (* (cos (* y.im (log x.im))) (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (/ (* y.im (log x.im)) y.re) (atan2 x.im x.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.im)))))) (sin (+ (* -1 (log (pow (/ -1 x.im) y.im))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* -1 (/ (log (pow (/ -1 x.im) y.im)) y.re)) (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1 (/ (log (pow (/ -1 x.im) y.im)) y.re)) (atan2 x.im x.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (exp (+ (* -1 (* y.im (atan2 x.im x.re))) (* -1 (* y.re (log (/ -1 x.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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log x.im)) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* 1/2 (PI))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (/ (log (pow (/ -1 x.im) y.im)) y.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (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)))) (* (atan2 x.im x.re) (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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 (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (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)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (- (+ (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (* y.im (- (* 1/6 (* (pow (log x.im) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow x.im y.re)))) (+ (* 1/2 (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log x.im) 2) (pow x.im y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (* (- (* -1 (* (log x.im) (* (sin (* y.re (atan2 x.im x.re))) (pow x.im y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow x.im y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow x.im y.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/6 (* y.im (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (pow x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow x.im y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow x.im y.re)))))) (* (atan2 x.im x.re) (pow x.im y.re)))) (pow x.im y.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 1))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))) (pow (/ -1 x.im) y.re))) (* -1 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))))) (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))) (pow (/ -1 x.im) y.re))) (+ (* -1 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (* y.im (+ (* -1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow (/ -1 x.im) y.re))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.im) y.re))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow (/ -1 x.im) y.re))))))))) (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))) (pow (/ -1 x.im) y.re))) (+ (* -1 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (* y.im (+ (* -1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow (/ -1 x.im) y.re))) (+ (* 1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.im) y.re))) (+ (* y.im (+ (* -1 (/ (* (+ (* -1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (pow (atan2 x.im x.re) 2))) (pow (/ -1 x.im) y.re))) (+ (* -1/2 (/ (* (log (/ -1 x.im)) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (pow (/ -1 x.im) y.re))) (+ (* -1/6 (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.im) y.re))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (* 1/6 (pow (log (/ -1 x.im)) 3)))) (pow (/ -1 x.im) y.re))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (/ -1 x.im)) (atan2 x.im x.re))) (pow (/ -1 x.im) y.re)))))))))) (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (/ -1 x.im) y.re)))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* y.im (+ (* -1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))) (+ (* -1/2 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* y.im (+ (* -1/2 (* (log (/ -1 x.im)) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3)))) (* 1/6 (pow (log (/ -1 x.im)) 3))))))))))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* -1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* y.im (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* -1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* -1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* y.im (+ (* -1 (log (/ -1 x.im))) (* y.im (+ (* -1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* -1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))) (* y.re (atan2 x.im x.re)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (log (/ -1 x.im)))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.im)) (* 1/2 (* y.im (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.im)) (* y.im (+ (* 1/6 (* y.im (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))) (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (log (pow (/ -1 x.im) y.im)) #s(hole binary64 (* y.im (+ (log (/ -1 x.im)) (* y.im (+ (* 1/2 (+ (* -1 (pow (log (/ -1 x.im)) 2)) (pow (log (/ -1 x.im)) 2))) (* y.im (+ (* 1/24 (* y.im (+ (* -6 (pow (log (/ -1 x.im)) 4)) (+ (* -4 (pow (log (/ -1 x.im)) 4)) (+ (* -3 (pow (log (/ -1 x.im)) 4)) (+ (* 12 (pow (log (/ -1 x.im)) 4)) (pow (log (/ -1 x.im)) 4))))))) (* 1/6 (+ (* -3 (pow (log (/ -1 x.im)) 3)) (+ (* 2 (pow (log (/ -1 x.im)) 3)) (pow (log (/ -1 x.im)) 3))))))))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 1))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (+ 1 (* y.im (log (/ -1 x.im))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.im)) (* 1/2 (* y.im (pow (log (/ -1 x.im)) 2))))))))
#s(approx (pow (/ -1 x.im) y.im) #s(hole binary64 (+ 1 (* y.im (+ (log (/ -1 x.im)) (* y.im (+ (* 1/6 (* y.im (pow (log (/ -1 x.im)) 3))) (* 1/2 (pow (log (/ -1 x.im)) 2)))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (/ 1 (pow (/ -1 x.im) y.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (/ (* y.im (atan2 x.im x.re)) (pow (/ -1 x.im) y.re))) (/ 1 (pow (/ -1 x.im) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.im) y.re))) (* 1/2 (/ (* y.im (pow (atan2 x.im x.re) 2)) (pow (/ -1 x.im) y.re))))) (/ 1 (pow (/ -1 x.im) y.re)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (/ (atan2 x.im x.re) (pow (/ -1 x.im) y.re))) (* y.im (+ (* -1/6 (/ (* y.im (pow (atan2 x.im x.re) 3)) (pow (/ -1 x.im) y.re))) (* 1/2 (/ (pow (atan2 x.im x.re) 2) (pow (/ -1 x.im) y.re))))))) (/ 1 (pow (/ -1 x.im) y.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (log (pow (/ -1 x.im) y.re)))))
#s(approx (neg y.im) #s(hole binary64 (* -1 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 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (- (+ (* -1 (* y.im (+ (* -1/4 (/ (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* -1/6 (* (pow (log x.im) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 2)))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))))) (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (pow x.im 2)))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* y.im (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) #s(hole binary64 (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* y.im (+ (* 1/2 (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2))) (* y.im (+ (* -1/4 (/ (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* -1/12 (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (pow x.im 2)))))))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)) (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))) (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (/ (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* -1/6 (/ (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))) (pow x.im 2))))) (/ (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))) (pow x.im 2)))) (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* -1/2 (* (pow x.re 2) (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))) (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (+ (* y.im (+ (* y.im (+ (* -1/2 (* (pow x.re 2) (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/6 (* (pow x.re 2) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3))))))) (* (pow x.re 2) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))) (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log x.im) 2) (sin (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log x.im) 3)))))) (* (cos (* y.re (atan2 x.im x.re))) (log x.im)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (log x.im) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) #s(hole binary64 (* (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* -1 (* 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 (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.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 (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* y.im (+ (* -1 (/ (log (pow (/ -1 x.im) y.re)) y.im)) (* -1 (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* 1/2 (/ (PI) y.im))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* y.im (- (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) y.im) (* 1/2 (/ (* (pow x.re 2) (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)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log x.im)) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.im (+ (/ (log (pow (/ -1 x.im) y.re)) y.im) (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1/2 (/ (PI) y.im)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1/2 (/ (* (pow x.re 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))

Outputs
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
(.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(sin.f64 (+.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))
(-.f64 (.f64 y.im (log.f64 x.im)) (.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (.f64 y.im (log.f64 x.im)) (.f64 y.re (atan2.f64 x.im x.re)))
(log.f64 x.im)
(*.f64 y.re (atan2.f64 x.im x.re))
(/.f64 (neg.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im))) (neg.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
(/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
(exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
(pow.f64 (exp.f64 y.re) (log.f64 x.im))
(exp.f64 (*.f64 y.re (log.f64 x.im)))
(+.f64 (cosh.f64 (.f64 y.re (log.f64 x.im))) (sinh.f64 (.f64 y.re (log.f64 x.im))))
(*.f64 y.re (log.f64 x.im))
(log.f64 (pow.f64 x.im y.re))
(pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))
(exp.f64 (*.f64 y.im (atan2.f64 x.im x.re)))
(+.f64 (cosh.f64 (.f64 y.im (atan2.f64 x.im x.re))) (sinh.f64 (.f64 y.im (atan2.f64 x.im x.re))))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))))
(.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(fma.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im) #s(literal -1 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im) #s(literal -1 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))
(-.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im) #s(literal -1 binary64))) (*.f64 (neg.f64 y.re) (atan2.f64 x.im x.re)))
(+.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im) #s(literal -1 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(*.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) (/.f64 y.im #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) (/.f64 y.im #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)
(exp.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) y.im))
(/.f64 #s(literal 1 binary64) (neg.f64 x.im))
(/.f64 #s(literal -1 binary64) x.im)
(.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (exp.f64 (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(exp.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))) (sinh.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))))
(fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(-.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))) (*.f64 (neg.f64 (neg.f64 y.im)) (atan2.f64 x.im x.re)))
(+.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))) (*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re)))
(*.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) (/.f64 y.re #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) (/.f64 y.re #s(literal 2 binary64))))
(pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)
(exp.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) y.re))
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))
(neg.f64 y.im)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.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))) (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (.f64 x.re x.re) (.f64 (neg.f64 x.im) x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
(fma.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
(cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
(+.f64 (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(.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))
(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 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (fabs.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) x.re)
(hypot.f64 (neg.f64 x.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 (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 x.im (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (.f64 (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) #s(literal 1/2 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 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(-.f64 (.f64 x.im x.im) (.f64 (neg.f64 x.re) x.re))
(+.f64 (.f64 x.im x.im) (.f64 x.re x.re))
#s(literal 1/2 binary64)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im)))))
(/.f64 (-.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))) #s(literal 3 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) x.im)))))))
(-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))))
(+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))))
(.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) x.im)))
(.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im))
(/.f64 (neg.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (neg.f64 (*.f64 x.im x.im)))
(/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))
(.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
(.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.im (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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))) (/.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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 x.im (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (exp (* (atan2 x.im x.re) y.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (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)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (neg y.im) (atan2 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (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))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (/.f64 (pow.f64 (exp.f64 y.re) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (neg.f64 (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.im (log.f64 x.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.im (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) x.im))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) x.im)))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) x.im))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (.f64 (.f64 x.re x.re) (-.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.im (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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))) (/.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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 x.re (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (exp (* y.re (log x.im))) (pow.f64 x.im y.re))
#s(approx (* y.re (log x.im)) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im))))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.im) y.im)) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (pow (/ -1 x.im) y.im) (pow.f64 (exp.f64 y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (/ -1 x.im) (/.f64 #s(literal -1 binary64) x.im))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (log.f64 x.im))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))))))
#s(approx (log (pow (/ -1 x.im) y.re)) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (pow (/ -1 x.im) y.re) (pow.f64 (exp.f64 y.re) (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.im (log.f64 x.re)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.re (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (/.f64 (-.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))))) (*.f64 x.im x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.im) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* y.re (log x.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 #s(literal -1 binary64) (log.f64 x.im)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im))))))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.im) y.im)) (.f64 y.im (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (pow (/ -1 x.im) y.im) (pow.f64 (exp.f64 y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (log.f64 x.im))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))))))
#s(approx (log (pow (/ -1 x.im) y.re)) (.f64 y.re (-.f64 (log.f64 #s(literal -1 binary64)) (.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (pow (/ -1 x.im) y.re) (pow.f64 (exp.f64 y.re) (-.f64 (log.f64 #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (log.f64 x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (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))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (.f64 #s(literal -1 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (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))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log x.im) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (* y.re (log x.im))) (pow.f64 (exp.f64 y.re) (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (* y.re (log x.im)) (*.f64 y.re (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))))
#s(approx (log (pow (/ -1 x.im) y.im)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))
#s(approx (pow (/ -1 x.im) y.im) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im))
#s(approx (log (pow (/ -1 x.im) y.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))
#s(approx (pow (/ -1 x.im) y.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (sin.f64 (+.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64)))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (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)))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (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)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (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)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (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))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.re (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (.f64 (neg.f64 y.re) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.re) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.re) (-.f64 (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* y.re (log x.im))) #s(literal 1 binary64))
#s(approx (exp (* y.re (log x.im))) (+.f64 #s(literal 1 binary64) (*.f64 y.re (log.f64 x.im))))
#s(approx (exp (* y.re (log x.im))) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (*.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))))))
#s(approx (exp (* y.re (log x.im))) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (+.f64 (log.f64 x.im) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (pow.f64 (log.f64 x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (atan2.f64 x.im x.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 y.re) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im) #s(literal -1 binary64))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 #s(literal 1 binary64) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.im (atan2.f64 x.im x.re))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 y.re (fma.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))
#s(approx (log (pow (/ -1 x.im) y.re)) (.f64 y.re (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) (.f64 y.re (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (log (pow (/ -1 x.im) y.re)) (.f64 y.re (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 y.re (fma.f64 #s(literal 1/24 binary64) (.f64 y.re (fma.f64 #s(literal -6 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64))))))) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))))))
#s(approx (pow (/ -1 x.im) y.re) #s(literal 1 binary64))
#s(approx (pow (/ -1 x.im) y.re) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))
#s(approx (pow (/ -1 x.im) y.re) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (pow (/ -1 x.im) y.re) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #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))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #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))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 #s(literal 1 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (neg.f64 y.re) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (.f64 (neg.f64 y.re) (-.f64 (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.re) (-.f64 (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 x.im x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (-.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.re) (-.f64 (.f64 y.re (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/12 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 x.im x.im))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 x.im x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 y.re (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 x.im x.im))) (.f64 #s(literal -1/12 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 x.im x.im)))))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im)))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (/.f64 (+.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (.f64 x.im x.im))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (*.f64 x.im x.im))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (fma.f64 y.re (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 x.im x.im))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 x.im x.im)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (.f64 x.im x.im))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))))) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.re (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im)))) (.f64 y.im (.f64 y.re (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (sin.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (fma.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) 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))) (/.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) 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)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) x.im) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im 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)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 x.im)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) y.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.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))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.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))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re)))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (.f64 y.im (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 x.im y.re))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (/ (exp (* y.re (log x.im))) (exp (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (* y.im (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* y.im (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))))) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (atan2.f64 x.im x.re))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))))))) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/6 binary64) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal 1/6 binary64) (.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))))))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (log (pow (/ -1 x.im) y.im)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)))
#s(approx (log (pow (/ -1 x.im) y.im)) (.f64 y.im (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (log (pow (/ -1 x.im) y.im)) (.f64 y.im (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (log (pow (/ -1 x.im) y.im)) (.f64 y.im (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 y.im (fma.f64 #s(literal 1/24 binary64) (.f64 y.im (fma.f64 #s(literal -6 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (fma.f64 #s(literal -3 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (fma.f64 #s(literal 12 binary64) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64)) (pow.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 4 binary64))))))) (.f64 #s(literal 1/6 binary64) (fma.f64 #s(literal -3 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal 2 binary64) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))))))
#s(approx (pow (/ -1 x.im) y.im) #s(literal 1 binary64))
#s(approx (pow (/ -1 x.im) y.im) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))
#s(approx (pow (/ -1 x.im) y.im) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.im) (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (pow (/ -1 x.im) y.im) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.im) (-.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 (neg.f64 y.im) (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64)))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))))
#s(approx (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re)))) (fma.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (atan2.f64 x.im x.re) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (log.f64 (pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re) #s(literal -1 binary64))))
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))))) (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (.f64 x.im x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal -1/6 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (.f64 x.im x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))) (*.f64 x.im x.im))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (*.f64 x.im x.im))))))))
#s(approx (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im))) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (.f64 x.im x.im)) (.f64 y.im (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal -1/12 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (.f64 x.im x.im))))))))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (.f64 y.im (/.f64 (-.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))) (*.f64 x.im x.im))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (.f64 x.im x.im))) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)) (.f64 y.im (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))) (.f64 x.im x.im)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))) (.f64 x.im x.im))) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (-.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (fma.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64))))))) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (-.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (-.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
#s(approx (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (.f64 y.im (-.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (-.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 x.im))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.im) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (* (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (exp (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))))) (.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* -1 (log (pow (/ -1 x.im) y.im))) (* y.re (atan2 x.im x.re))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) y.im) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)) y.im)))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (.f64 y.im (-.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im)))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (.f64 y.im (-.f64 (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) y.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 x.im) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* -1 (log (pow (/ -1 x.im) y.re))) (* (neg y.im) (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (/.f64 (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) y.im) (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)) y.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.im))))))
#s(approx (- (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (* x.re x.re) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))

eval190.0ms (1.7%)

Memory: 2.3MiB live, 272.9MiB allocated; 60ms collecting garbage
Compiler: Compiled 108 448 to 7 363 computations (93.2% saved)

prune558.0ms (5%)

Memory

41.0MiB live, 418.3MiB allocated; 73ms collecting garbage

Pruning

10 alts after pruning (8 fresh and 2 done)

	Pruned	Kept	Total
New	1 145	7	1 152
Fresh	4	1	5
Picked	4	1	5
Done	0	1	1
Total	1 153	10	1 163

Accuracy

98.4%

Counts

1 163 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	76.3%	(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	40.3%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	36.1%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	48.0%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 #s(approx (+ (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))))
▶	83.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	42.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))))
▶	50.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))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
	68.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 #s(approx (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
▶	49.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))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))
✓	34.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (exp.f64 (.f64 y.im (atan2.f64 x.im x.re))))))

Compiler

Compiled 874 to 560 computations (35.9% saved)

series394.0ms (3.5%)

Memory

5.5MiB live, 388.0MiB allocated; 53ms collecting garbage

Counts

65 → 837

Calls

Call 1

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

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))) (* (log x.im) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (sin (PI)) (pow x.im 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (PI)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (PI)) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* 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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* 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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.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.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log 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))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log x.re) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))) (* (log x.re) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (sin (PI)) (pow x.re 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (PI)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (PI)) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* 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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* 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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.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))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.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))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* 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 (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* 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 (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (cos (+ (* (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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (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)))) (* (atan2 x.im x.re) (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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 (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (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)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (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)))) (* (atan2 x.im x.re) (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 (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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 (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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 (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (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)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (- (/ (sin (* 1/2 (PI))) y.im) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* 1/2 (PI))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))

Calls

12 calls:

Time	Variable		Point	Expression
109.0ms	y.im	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re))
33.0ms	x.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re))
25.0ms	x.im	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re))
23.0ms	y.re	@	-inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re))
23.0ms	y.re	@	inf	((* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re x.im y.re (* (atan2 x.im x.re) y.im) (atan2 x.im x.re) y.im (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (* (atan2 x.im x.re) y.re) (/ (PI) 2) (PI) 2 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (+ (* x.re x.re) (* x.im x.im)) (* x.re x.re) (* x.im x.im) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin (* 1/2 (PI))) (* 1/2 (PI)) 1/2 (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (+ (* 1/2 (PI)) (/ (PI) 2)) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+ (* x.im x.im) (* x.re x.re)) (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (sin (* y.re (atan2 x.im x.re))) (* y.re (atan2 x.im x.re)) (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im)) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (sqrt (+ (* x.re x.re) (* x.im x.im))) (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re))

rewrite497.0ms (4.5%)

Memory

-27.0MiB live, 417.3MiB allocated; 150ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	4239	73740
0	4356	70431
0	8748	64225

Stop Event

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

Counts

902 → 1 034

Calls

Call 1

Inputs
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))))))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im))))
(sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 x.re x.re)
(*.f64 x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64)))))))
(-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))))
(neg.f64 y.im)
(.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(log.f64 (pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64)))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.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 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(pow.f64 (hypot.f64 x.re x.im) y.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (* x.re x.re) #s(hole binary64 (pow x.re 2)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.im) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))) (* (log x.im) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (sin (PI)) (pow x.im 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (PI)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (PI)) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.im)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.im 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (+ (pow x.im 2) (pow x.re 2))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.im) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.im) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (log x.im) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.im) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* 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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.im 2) (exp (* 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))))) (pow x.im y.re))) (exp (* 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)))))) (pow x.im y.re)) (exp (* 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)))) (pow x.im y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (pow x.re 2)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.re 2) (+ 1 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.re 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.re)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.re))))))))) (* (pow x.re 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.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))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (* x.im x.im) #s(hole binary64 (pow x.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.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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log 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))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log x.re) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* (log x.re) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))) (* (log x.re) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (sin (PI)) (pow x.re 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (PI)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (PI)) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 6))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (log x.re)))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.im (* (log x.re) (sin (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.re 6))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log x.re) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (log x.re) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* (log x.re) (sin (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (* y.re (atan2 x.im x.re))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* 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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (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 y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* 1/4 (/ (* y.im (* y.re (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (* (cos (+ (* 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)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.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 y.re))) (* (pow x.re 2) (exp (* 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))))) (pow x.re y.re))) (exp (* 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)))))) (pow x.re y.re)) (exp (* 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)))) (pow x.re y.re))) (exp (* 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 y.re)) (exp (* 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 y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) #s(hole binary64 (* (pow x.im 2) (+ 1 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ 1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (pow x.im 6))) (+ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* y.im (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 x.im)))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #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 (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (* y.im (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (* y.re (atan2 x.im x.re))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (* -1 (* y.re (log (/ -1 x.im))))))))) (* (pow x.im 4) (exp (* y.im (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))))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.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))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (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) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (+ (* y.re (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 3)))) (+ (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))) (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (atan2 x.im x.re))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.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))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.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))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) #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 (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* -1/6 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* 1/120 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.re (+ (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (* (pow y.re 2) (+ (* -1/6 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (pow y.re 2) (+ (* -1/5040 (* y.im (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7))))) (* 1/120 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* 1/120 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* y.re (+ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re)) (* (pow y.re 2) (+ (* -1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 3))) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 7)))) (* 1/120 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 5)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* -1/6 (* (pow y.re 2) (pow (atan2 x.im x.re) 3))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* 1/120 (* (pow y.re 2) (pow (atan2 x.im x.re) 5))))) (atan2 x.im x.re)))))
#s(approx (sin (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* (pow y.re 2) (+ (* -1/6 (pow (atan2 x.im x.re) 3)) (* (pow y.re 2) (+ (* -1/5040 (* (pow y.re 2) (pow (atan2 x.im x.re) 7))) (* 1/120 (pow (atan2 x.im x.re) 5)))))) (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* 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 (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* 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 (* y.im (atan2 x.im x.re)))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (/ (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (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))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/6 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (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)))))))) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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 (* y.im (atan2 x.im x.re))))))) (/ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))) (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) #s(hole binary64 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (/ (* (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (cos (+ (* (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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* 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 (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (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)))) (* (atan2 x.im x.re) (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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 (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (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)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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)) (exp (* (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (* (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)))) (* (atan2 x.im x.re) (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 (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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 (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (- (+ (* 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)))) (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 (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* (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)))) (pow (atan2 x.im x.re) 2))) (* (- (* -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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (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)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) 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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (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))))) (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* y.im (- (/ (sin (* 1/2 (PI))) y.im) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* 1/2 (PI))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) y.im)) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re))))))))))

Outputs
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (atan2.f64 x.im x.re) y.im)
(atan2.f64 x.im x.re)
y.im
(fma.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im)) (sin.f64 (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (neg.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.re))
(+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(*.f64 (atan2.f64 x.im x.re) y.re)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
(PI.f64)
#s(literal 2 binary64)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.re (*.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.im) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (fma.f64 (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (atan2.f64 x.im x.re) y.im) (.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
(fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(-.f64 (.f64 x.re x.re) (.f64 (neg.f64 x.im) x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)))
(*.f64 (neg.f64 x.re) (neg.f64 x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 x.re x.re)
(pow.f64 x.re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.re) #s(literal 2 binary64)))
(*.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(/.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (fma.f64 (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
(-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
#s(literal 1/2 binary64)
(.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
(neg.f64 y.im)
(*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re))))
(log.f64 (hypot.f64 x.im x.re))
(.f64 (pow.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re)) #s(literal 1/4 binary64)) (pow.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re)) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.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 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (fabs.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) x.re)
(hypot.f64 (neg.f64 x.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 (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 x.im (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (.f64 (log.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re))) #s(literal 1/2 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 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(-.f64 (.f64 x.im x.im) (.f64 (neg.f64 x.re) x.re))
(+.f64 (.f64 x.im x.im) (.f64 x.re x.re))
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
(/.f64 (-.f64 (pow.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) #s(literal 3 binary64))) (fma.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))))
(-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
(+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
(fma.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (/.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 y.re (atan2.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(literal 1 binary64)
(.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))
(sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(*.f64 (pow.f64 (hypot.f64 x.re x.im) (/.f64 y.re #s(literal 2 binary64))) (pow.f64 (hypot.f64 x.re x.im) (/.f64 y.re #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(-.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im) (*.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))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (cos.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(*.f64 (pow.f64 (hypot.f64 x.re x.im) (/.f64 y.re #s(literal 2 binary64))) (pow.f64 (hypot.f64 x.re x.im) (/.f64 y.re #s(literal 2 binary64))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(pow.f64 (fma.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.re #s(literal 1 binary64)) (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.im) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 x.im (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (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)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.im x.im))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (neg.f64 (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (*.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.im) #s(literal 0 binary64)))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im)) (.f64 (log.f64 x.im) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) #s(literal 0 binary64) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.im) #s(literal 0 binary64) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.im))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.im) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.im)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.im (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re)))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (-.f64 (.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 x.im x.im))) (.f64 (neg.f64 (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im 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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.im (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (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)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.im (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.im x.im)) (/.f64 (pow.f64 x.im y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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)) (pow.f64 x.im y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (*.f64 x.re x.re))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) x.re)
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 x.re) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 x.re (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (neg.f64 (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (* x.im x.im) (*.f64 x.im x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (*.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (*.f64 (log.f64 x.re) #s(literal 0 binary64)))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re)) (.f64 (log.f64 x.re) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) #s(literal 0 binary64) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 (log.f64 x.re) #s(literal 0 binary64) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 x.re))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (-.f64 (log.f64 x.re) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (-.f64 x.re (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (-.f64 (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 x.re x.re)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 x.re x.re))) (.f64 (neg.f64 (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re 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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.im (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re 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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.im (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 y.re (.f64 x.re x.re)) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (/.f64 (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (pow.f64 x.re y.re))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)))) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im)))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.im (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (pow (+ (* x.im x.im) (* x.re x.re)) 1/2) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (-.f64 (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 (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)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (/.f64 (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.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)) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (-.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (neg.f64 y.re) (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 (neg.f64 y.re) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.re) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.re) (-.f64 (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.re) (-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.re) (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.re) (-.f64 (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 y.re (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.re) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.re) (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.re (fma.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (.f64 y.re y.re) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 y.im (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))))) (.f64 #s(literal 1/120 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (-.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)) (.f64 (neg.f64 (.f64 y.re y.re)) (fma.f64 #s(literal -1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/120 binary64) (.f64 (.f64 y.re y.re) (*.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 y.re (fma.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re) (.f64 (.f64 y.re y.re) (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 (neg.f64 (.f64 y.re y.re)) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 y.re y.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64)))) (.f64 #s(literal 1/120 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))))))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/120 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64))))) (atan2.f64 x.im x.re))))
#s(approx (sin (* y.re (atan2 x.im x.re))) (.f64 y.re (fma.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/5040 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 7 binary64))) (*.f64 #s(literal 1/120 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 5 binary64)))))) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)))) (fma.f64 y.re (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (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)) (exp (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(literal 1 binary64))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (*.f64 (neg.f64 y.re) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (-.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal 1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (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)) (exp (* (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)) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))) (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)) (exp (* (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)) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (neg.f64 y.im) (-.f64 (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64)))))
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(literal 1 binary64))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (.f64 y.im (-.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) y.im) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (.f64 y.im (-.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) y.im) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64))))))
#s(approx (- (sin (+ (* y.re (atan2 x.im x.re)) (/ (PI) 2))) (* 1 (* y.im (* (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2)) (sin (* y.re (atan2 x.im x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))

eval218.0ms (2%)

Memory: -1.5MiB live, 369.2MiB allocated; 51ms collecting garbage
Compiler: Compiled 125 562 to 8 152 computations (93.5% saved)

prune967.0ms (8.7%)

Memory

9.3MiB live, 773.9MiB allocated; 103ms collecting garbage

Pruning

9 alts after pruning (4 fresh and 5 done)

	Pruned	Kept	Total
New	1 396	4	1 400
Fresh	3	0	3
Picked	1	4	5
Done	1	1	2
Total	1 401	9	1 410

Accuracy

98.4%

Counts

1 410 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	79.2%	(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
✓	76.3%	(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	38.4%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
✓	36.1%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	83.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	43.5%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
▶	71.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
✓	42.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))))
✓	50.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))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))

Compiler

Compiled 457 to 269 computations (41.1% saved)

series535.0ms (4.8%)

Memory

-4.7MiB live, 660.2MiB allocated; 104ms collecting garbage

Counts

68 → 1 023

Calls

Call 1

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

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (+ (* (sin (* 1/2 (PI))) (- (* -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) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* 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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (- (* -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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* 1/2 (PI))) (- (* -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) (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (exp (atan2 x.im x.re)) #s(hole binary64 (exp (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.im) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))) (* (log x.im) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (sin (PI)) (pow x.im 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (PI)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (PI)) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (PI))) (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.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (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 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* -1 x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (+ (* (sin (* 1/2 (PI))) (- (* -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) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* 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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (- (* -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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* 1/2 (PI))) (- (* -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) (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log 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))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log x.re) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.re) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))) (* (log x.re) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (sin (PI)) (pow x.re 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (PI)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (PI)) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.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 (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1 (* y.im (+ (* 1/12 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))))) (* -1 (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* 1/12 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) (* -1 (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/12 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* 1/2 (PI)))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* y.re (- (* -1/2 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 1/2 (PI))) (atan2 x.im 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/6 (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))))))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 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)))))) (atan2 x.im 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 (/ (PI) 2))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (* (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)))))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.re (* (sin (* 1/2 (PI))) (* (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)))))) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* 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 (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -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 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* 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))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* 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 (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))) (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* 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 (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* 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)))))))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/6 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))))))) (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 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 (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 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 (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.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) (sin (* 1/2 (PI)))))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (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 (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 1))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow y.im 2)) (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -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)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* 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)))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (* 1/2 (PI))) y.im) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (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)))))) 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))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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)))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* 1/2 (PI))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))

Calls

12 calls:

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

rewrite502.0ms (4.5%)

Memory

46.9MiB live, 596.7MiB allocated; 100ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	5992	104642
0	6109	96817
0	8623	92572

Stop Event

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

Counts

1 091 → 1 174

Calls

Call 1

Inputs
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(hypot.f64 x.re x.im)
x.re
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))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
(-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal 1/2 binary64)
(PI.f64)
(*.f64 y.re (atan2.f64 x.im x.re))
(.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))
(neg.f64 y.im)
(fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))
#s(literal -1/2 binary64)
(.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
(.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (hypot.f64 x.im x.re))
(hypot.f64 x.im x.re)
(.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
(*.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
(*.f64 (atan2.f64 x.im x.re) y.re)
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))))
(/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) (cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))))
(sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
(cos.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))) (sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)))
(sin.f64 (/.f64 (PI.f64) #s(literal 2 binary64)))
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(pow.f64 (hypot.f64 x.re x.im) y.re)
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im 2))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.im)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))) (* y.re (log x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow x.im 4))) (* 1/2 (/ y.re (pow x.im 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ y.re (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow x.im 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx x.re #s(hole binary64 x.re))
#s(approx (* (atan2 x.im x.re) y.im) #s(hole binary64 (* y.im (atan2 x.im x.re))))
#s(approx (atan2 x.im x.re) #s(hole binary64 (atan2 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* y.re (atan2 x.im x.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))) (* (pow x.re 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4)))))) (* -1 (* (pow x.re 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* (pow x.re 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 6)))))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2)))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* (pow x.re 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))))) (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (* (pow x.re 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6))))))))) (/ (* y.im (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (pow x.re 2) (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4)))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (* (pow x.re 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (* (log x.im) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))) (* (pow (log x.im) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log x.im) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (/ (* (pow x.re 2) (log x.im)) (pow x.im 2)) (pow (log x.im) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (* 1/4 (/ 1 (pow x.im 4))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* (pow x.re 2) (+ (* -1/2 (/ (log x.im) (pow x.im 4))) (+ (* 1/4 (/ 1 (pow x.im 4))) (* (pow x.re 2) (- (* 1/3 (/ (log x.im) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 6)))))))) (/ (log x.im) (pow x.im 2)))) (pow (log x.im) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.im)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow x.im 4))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.im) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow x.im 6))) (* 1/4 (/ 1 (pow x.im 4))))) (* 1/2 (/ 1 (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* 1/2 (/ (pow x.re 2) x.im)))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow x.im 3))) (* 1/2 (/ 1 x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (+ x.im (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow x.im 5))) (* 1/8 (/ 1 (pow x.im 3))))) (* 1/2 (/ 1 x.im)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.im)) (* (pow x.re 2) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))))))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (+ (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow x.im 4))) (* 1/2 (/ y.im (pow x.im 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.im)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow x.im 6)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.im y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (* (sin (* 1/2 (PI))) (- (* -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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))) (+ (* (sin (* 1/2 (PI))) (- (* -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) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 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 (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (cos (+ (* 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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (* (sin (* 1/2 (PI))) (- (* -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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow x.re 2) (+ (* (sin (* 1/2 (PI))) (- (* -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) (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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.im y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.im 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.im 6))) (* 1/6 (/ y.re (pow x.im 6))))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 6))) (* (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re))))) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.im)) (* y.re (atan2 x.im x.re)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.re 2) (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.re 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.im 4))) (* 1/8 (/ (pow y.re 2) (pow x.im 4)))) (pow x.im y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.im y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (pow x.im y.re))) (pow x.im 2))) (pow x.im y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (pow x.im y.re)) (pow x.im 2))) (* (pow x.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 (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (exp (* y.im (atan2 x.im x.re)))))
#s(approx (exp (atan2 x.im x.re)) #s(hole binary64 (exp (atan2 x.im x.re))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.im)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 4))) (* (pow x.re 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.im))))) (pow x.im 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.im)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.im 6))) (* 1/6 (/ y.im (pow x.im 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* -1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.re 2) (- (* (pow x.re 2) (- (* 1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2)))))) (* -1 (* y.im (* (log x.im) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log x.im) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* 1/4 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.im) (sin (PI))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/6 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.im 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.im) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))) (* (log x.im) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (sin (PI)) (pow x.im 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.im) (sin (PI))) (* (pow x.re 2) (+ (* 1/2 (/ (sin (PI)) (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (sin (PI)) (pow x.im 4))) (* 1/6 (/ (* (pow x.re 2) (sin (PI))) (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.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re))))))) (pow x.re 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ 1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ 1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ 1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ 1 x.re)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (pow (log (/ 1 x.re)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ 1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ 1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ 1 x.re))) (pow x.re 4))) (pow (log (/ 1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ 1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (pow x.re 6))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.re 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (pow x.re 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (pow x.re 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (pow x.re 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (pow x.re 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (pow x.re 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.re)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.re) (pow x.re 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))))) (* -1/4 (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.re 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* 1/2 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* y.im (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* y.im (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))))))) (pow x.re 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re))))))) (pow x.re 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (* (log (/ -1 x.re)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* (pow (log (/ -1 x.re)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.im 6)) (* -1/360 (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.im 4)) (* 1/2 (* (pow x.im 4) (log (/ -1 x.re)))))) (pow x.re 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ -1 x.re)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (pow (log (/ -1 x.re)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.im 2) (log (/ -1 x.re))) (pow x.re 2))) (+ (* -1/4 (/ (pow x.im 6) (pow x.re 6))) (+ (* -1/360 (/ (* (log (/ -1 x.re)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 4) (log (/ -1 x.re))) (pow x.re 4))) (pow (log (/ -1 x.re)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.re))) (+ (* -1/4 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (* 1/2 (/ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.re (+ 1 (+ (* -1/8 (/ (pow x.im 4) (pow x.re 4))) (+ (* 1/16 (/ (pow x.im 6) (pow x.re 6))) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow x.im 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* 1/8 (/ (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))) (pow x.re 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) y.im) (pow x.re 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/2 (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.im 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.im 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (pow x.re 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.re)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2)))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* -1/8 (* (pow x.im 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.im 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (- (* 1/8 (* (pow x.im 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.im 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.re))))))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.re))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/4 (* (pow x.im 4) y.re)) (* 1/8 (* (pow x.im 4) (pow y.re 2))))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.re))))) (+ (* -1/8 (* (pow x.im 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (* 1/48 (* (pow x.im 6) (pow y.re 3)))))) (* (pow x.re 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.re 6))) (+ (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))))) (pow x.re 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.re)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.im 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6)))) (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6))))) (pow x.re 6))) (+ (* 1/4 (/ (* (pow x.im 4) (* y.im (sin (PI)))) (pow x.re 4))) (* y.im (* (log (/ -1 x.re)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.re)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.re)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.im 4) (sin (PI))) (pow x.re 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.im 6)) (* 90 (pow x.im 6)))) (pow x.re 6))) (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 4))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re 2))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log x.re)) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6)))))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.re) (pow x.re 2))) (* y.re (log x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow x.re 4))) (* 1/2 (/ y.re (pow x.re 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow x.re 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* 1/2 (/ (pow x.im 2) x.re)))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow x.re 3))) (* 1/2 (/ 1 x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ x.re (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow x.re 5))) (* 1/8 (/ 1 (pow x.re 3))))) (* 1/2 (/ 1 x.re)))))))
#s(approx x.im #s(hole binary64 x.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (+ (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))))) (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))) (* (pow x.im 2) (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4)))))) (* -1 (* (pow x.im 2) (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* (pow x.im 2) (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))) (* 1/6 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 6)))))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* (pow x.im 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))))) (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* 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)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (* (pow x.im 2) (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6))))))))) (/ (* y.im (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (pow x.im 2) (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4)))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (* (pow x.im 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (* (log x.re) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2)))) (* (pow (log x.re) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log x.re) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (/ (* (pow x.im 2) (log x.re)) (pow x.re 2)) (pow (log x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (* 1/4 (/ 1 (pow x.re 4))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* (pow x.im 2) (+ (* -1/2 (/ (log x.re) (pow x.re 4))) (+ (* 1/4 (/ 1 (pow x.re 4))) (* (pow x.im 2) (- (* 1/3 (/ (log x.re) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 6)))))))) (/ (log x.re) (pow x.re 2)))) (pow (log x.re) 2))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (log x.re)))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* 1/2 (/ (pow x.im 2) (pow x.re 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow x.re 4))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (log x.re) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow x.re 6))) (* 1/4 (/ 1 (pow x.re 4))))) (* 1/2 (/ 1 (pow x.re 2))))))))
#s(approx (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 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 2))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log x.re)) (* (pow x.im 2) (+ (* 1/2 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* (exp (- (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 4))) (* (pow x.im 2) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) y.im) (pow x.re 2))) (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow x.re 4))) (* 1/2 (/ y.im (pow x.re 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log x.re)) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow x.re 6)))))))))))
#s(approx (* -1 x.im) #s(hole binary64 (* -1 x.im)))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* 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)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))) (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow x.re y.re)))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (* (sin (* 1/2 (PI))) (- (* -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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (+ (* 1/2 (/ (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (/ (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))) (+ (* (sin (* 1/2 (PI))) (- (* -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) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* 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))))))) (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 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 (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (cos (+ (* 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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.im 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))))) (pow x.re 2))) (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (* (sin (* 1/2 (PI))) (- (* -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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))))) (pow x.re 2))) (* (pow x.im 2) (+ (* (sin (* 1/2 (PI))) (- (* -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) (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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.re y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)))) (* (pow x.re 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* y.re (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/8 (/ (pow y.re 2) (pow x.re 6))) (+ (* 1/48 (/ (pow y.re 3) (pow x.re 6))) (* 1/6 (/ y.re (pow x.re 6))))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 6))) (* (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re))))) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re))))))))))) (/ (* (cos (+ (* y.im (log x.re)) (* y.re (atan2 x.im x.re)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (pow x.im 2) (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re))) (exp (* y.im (atan2 x.im x.re)))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (pow x.re y.re)) (* (pow x.re 2) (exp (* y.im (atan2 x.im x.re)))))) (* (pow x.im 2) (+ (/ (* (+ (* -1/4 (/ y.re (pow x.re 4))) (* 1/8 (/ (pow y.re 2) (pow x.re 4)))) (pow x.re y.re)) (exp (* y.im (atan2 x.im x.re)))) (/ (* (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))) (exp (* y.im (atan2 x.im x.re)))))))) (/ (pow x.re y.re) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (pow x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (* y.re (pow x.re y.re))) (pow x.re 2))) (pow x.re y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re x.re) (* x.im x.im))) 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))))) (pow x.re 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (cos (+ (* 1/2 (PI)) (* y.im (log x.re))))) (pow x.re 4))) (+ (* -1/8 (/ (* (pow y.im 2) (sin (+ (* 1/2 (PI)) (* y.im (log 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))))) (pow x.re 6))) (* (cos (+ (* 1/2 (PI)) (* y.im (log x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow x.re 6))) (* 1/6 (/ y.im (pow x.re 6)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2)))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* -1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* (pow x.im 2) (- (* (pow x.im 2) (- (* 1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))) (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2)))))) (* -1 (* y.im (* (log x.re) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log x.re) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 2))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* 1/4 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 4))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* y.im (* (log x.re) (sin (PI))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (sin (PI))) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/6 (/ (* (pow x.im 2) (* y.im (sin (PI)))) (pow x.re 6))) (* 1/4 (/ (* y.im (sin (PI))) (pow x.re 4))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (log x.re) (sin (PI)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 2))) (* (log x.re) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 4))) (* 1/2 (/ (sin (PI)) (pow x.re 2))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* (log x.re) (sin (PI))) (* (pow x.im 2) (+ (* 1/2 (/ (sin (PI)) (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (sin (PI)) (pow x.re 4))) (* 1/6 (/ (* (pow x.im 2) (sin (PI))) (pow x.re 6))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ 1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ 1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im))))))) (pow x.im 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ 1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ 1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ 1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ 1 x.im)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (pow (log (/ 1 x.im)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ 1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ 1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ 1 x.im))) (pow x.im 4))) (pow (log (/ 1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ 1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ 1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ 1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ 1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ 1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ 1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ 1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ 1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ 1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ 1 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ 1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ 1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ 1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ 1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (pow x.im 6))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (pow x.im 6))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (pow x.im 4)) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (pow x.im 6)) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (pow x.im 6)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))) (pow x.im 2))) (+ (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4)) (/ (* (exp (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (pow x.im 6)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* -1 (* y.re (log (/ -1 x.im)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* -1 (* y.re (log (/ -1 x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* -1 (* y.re (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.re) (pow x.im 4))) (+ (* 1/720 (/ (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) y.re) (pow x.im 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (- (+ (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 6))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))) (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* 1/720 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6))) (+ (* -1 (/ (* y.im (+ (* -1/2 (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))))) (* -1/4 (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))) (pow x.im 4))) (* -1 (/ (* y.im (+ (* 1/2 (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* 1/2 (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/2 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6))) (+ (* -1/2 (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))) (* 1/2 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* y.im (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* y.im (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+ (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))))))) (pow x.im 6)) (/ (* y.im (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im))))))) (pow x.im 4)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (* (log (/ -1 x.im)) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (+ (* (pow (log (/ -1 x.im)) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (pow x.re 6)) (* -1/360 (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)) (/ (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 1/4 (pow x.re 4)) (* 1/2 (* (pow x.re 4) (log (/ -1 x.im)))))) (pow x.im 4)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (pow (log (/ -1 x.im)) 2)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (pow (log (/ -1 x.im)) 2))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (/ (* (pow x.re 2) (log (/ -1 x.im))) (pow x.im 2))) (+ (* -1/4 (/ (pow x.re 6) (pow x.im 6))) (+ (* -1/360 (/ (* (log (/ -1 x.im)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 4) (log (/ -1 x.im))) (pow x.im 4))) (pow (log (/ -1 x.im)) 2))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (* -1 (log (/ -1 x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) #s(hole binary64 (+ (* -1 (log (/ -1 x.im))) (+ (* -1/4 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/720 (/ (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (* 1/2 (/ (pow x.re 2) (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) #s(hole binary64 (* -1 (* x.im (+ 1 (+ (* -1/8 (/ (pow x.re 4) (pow x.im 4))) (+ (* 1/16 (/ (pow x.re 6) (pow x.im 6))) (* 1/2 (/ (pow x.re 2) (pow x.im 2))))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (pow x.im 4))) (+ (* 1/720 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (cos (+ (* 1/2 (PI)) (* 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (exp (- (* -1 (* y.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* -1/8 (/ (* (pow x.re 4) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 4))) (+ (* 1/8 (/ (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))) (pow x.im 6)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (PI)) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* -1 (* y.im (log (/ -1 x.im)))) (+ (* -1/4 (/ (* (pow x.re 4) y.im) (pow x.im 4))) (+ (* 1/720 (/ (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) y.im) (pow x.im 2))) (* y.re (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/2 (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* 1/2 (* (pow x.re 2) (* y.im (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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))))))))) (* (sin (* 1/2 (PI))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (pow x.im 4))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* 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 (* (cos (* 1/2 (PI))) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (cos (* 1/2 (PI))) (+ (* -1/4 (* (pow x.re 4) (* y.im (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) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (+ (/ (* (cos (* 1/2 (PI))) (+ (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* -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)) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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 (sin (+ (* (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)))) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 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)))) (* 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)))) (* 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)))) (* y.re (atan2 x.im x.re)))))) (pow x.im 2))) (/ (* (cos (+ (* -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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow 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 (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (sin (* 1/2 (PI))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (pow x.im 2))) (+ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))) (+ (/ (* (sin (* 1/2 (PI))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (pow x.im 4)) (/ (* (sin (* 1/2 (PI))) (- (* 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.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 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)))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))))))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (exp (* -1 (* y.re (log (/ -1 x.im)))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2)))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* -1/8 (* (pow x.re 4) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* -1/4 (* (pow x.re 4) (* y.im (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (- (* 1/8 (* (pow x.re 6) (* (pow y.im 2) (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re))))))) (* (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (* (pow x.re 6) (pow y.im 3))) (* 1/720 (* y.im (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re)))))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (* (pow x.im 2) (exp (* y.im (atan2 x.im x.re)))))) (+ (/ (exp (* -1 (* y.re (log (/ -1 x.im))))) (exp (* y.im (atan2 x.im x.re)))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/4 (* (pow x.re 4) y.re)) (* 1/8 (* (pow x.re 4) (pow y.re 2))))) (* (pow x.im 4) (exp (* y.im (atan2 x.im x.re))))) (/ (* (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* -1/8 (* (pow x.re 6) (pow y.re 2))) (+ (* 1/720 (* y.re (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (* 1/48 (* (pow x.re 6) (pow y.re 3)))))) (* (pow x.im 6) (exp (* y.im (atan2 x.im x.re))))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (exp (* -1 (* y.re (log (/ -1 x.im)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (/ (* (exp (* -1 (* y.re (log (/ -1 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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ (exp (* -1 (* y.re (log (/ -1 x.im))))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (* -1 (* y.re (log (/ -1 x.im))))))) (pow x.im 2))) (+ (/ (* (exp (* -1 (* y.re (log (/ -1 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 (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (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)))))) (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)))))) (pow x.im 6))) (+ (* 1/2 (/ (* (pow x.re 2) (* y.im (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))))) (pow x.im 2))) (/ (* (cos (+ (* -1 (* y.im (log (/ -1 x.im)))) (* 1/2 (PI)))) (+ (* -1/48 (* (pow x.re 6) (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 (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2)))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* -1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* 1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6)))) (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* y.im (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (PI)))) (pow x.im 2))) (+ (* -1/720 (/ (* y.im (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6))))) (pow x.im 6))) (+ (* 1/4 (/ (* (pow x.re 4) (* y.im (sin (PI)))) (pow x.im 4))) (* y.im (* (log (/ -1 x.im)) (sin (PI)))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* -1 (* (log (/ -1 x.im)) (sin (PI))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* (log (/ -1 x.im)) (sin (PI)))) (+ (* -1/4 (/ (* (pow x.re 4) (sin (PI))) (pow x.im 4))) (+ (* 1/720 (/ (* (sin (PI)) (+ (* 30 (pow x.re 6)) (* 90 (pow x.re 6)))) (pow x.im 6))) (* 1/2 (/ (* (pow x.re 2) (sin (PI))) (pow x.im 2))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))) (+ (* -1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* 1/6 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (exp (neg (* y.im (atan2 x.im x.re)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (neg (* y.im (atan2 x.im x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (neg (* y.im (atan2 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* 1/2 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (exp (neg (* y.im (atan2 x.im x.re)))) (* y.re (+ (* y.re (+ (* 1/6 (* y.re (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/2 (* (exp (neg (* y.im (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))))) (* (exp (neg (* y.im (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (atan2 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx y.re #s(hole binary64 y.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* -1 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (* 1/2 (PI))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (+ (sin (* 1/2 (PI))) (* y.re (- (* (cos (* 1/2 (PI))) (atan2 x.im x.re)) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.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 (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))) (* y.re (- (* -1/6 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))) (* -1 (* y.im (+ (* 1/12 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))))) (* -1 (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* (cos (* 1/2 (PI))) (atan2 x.im x.re))) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.re (* (cos (* 1/2 (PI))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* 1/2 (PI))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))))) (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))))) (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (* -1 (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (* y.re (+ (* -1 (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))) (* y.re (+ (* -1 (* y.im (* y.re (+ (* 1/12 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))) (* -1 (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (+ (* -1/2 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (+ (* 1/4 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* y.re (+ (* 1/12 (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))) (* 1/6 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* y.re (+ (* -1/2 (* y.im (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (+ (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* y.re (+ (* y.im (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* -1/6 (* y.im (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3)))))))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1/2 (* y.re (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* -1/6 (* y.re (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (atan2 x.im x.re) 3))))))) (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (atan2 x.im x.re))))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* -1 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* -1/2 (* y.re (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.re (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3))))))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (cos (* 1/2 (PI)))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* -1 (* y.re (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* y.re (- (* -1/2 (* y.re (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* (sin (* 1/2 (PI))) (atan2 x.im x.re)))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) #s(hole binary64 (+ (cos (* 1/2 (PI))) (* y.re (- (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (* 1/6 (* y.re (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 3)))))) (* (sin (* 1/2 (PI))) (atan2 x.im 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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* -1/2 (* (exp (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* -1/2 (* y.re (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2)))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (pow (atan2 x.im x.re) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.re (+ (* -1 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/2 (/ (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1/6 (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (exp (* y.im (atan2 x.im x.re))))))))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (exp (* y.im (atan2 x.im x.re))))))))) (+ (/ (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))) (exp (* y.im (atan2 x.im x.re)))))))) (+ (/ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (exp (* y.im (atan2 x.im x.re)))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))) (exp (* y.im (atan2 x.im x.re))))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 1))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #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 (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) 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 (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (+ (* y.re (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* y.re (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)))) (* 1/6 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3))))))))) (* (cos (* 1/2 (PI))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* -1/2 (* y.re (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* y.re (+ (* y.re (+ (* -1/2 (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2))) (* -1/6 (* y.re (* (cos (* 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)))))) (atan2 x.im 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 (/ (PI) 2))) #s(hole binary64 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.re (* (sin (* 1/2 (PI))) (* (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)))))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* -1/2 (* y.re (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2))))))) (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.re (+ (* -1 (* (sin (* 1/2 (PI))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)))) (* y.re (+ (* -1/2 (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (sin (* 1/2 (PI))) (pow (atan2 x.im x.re) 2)))) (* 1/6 (* y.re (* (sin (* 1/2 (PI))) (* (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)))))) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (* y.im (atan2 x.im x.re))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re)))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re)) (exp (* y.im (atan2 x.im x.re))))) (+ (* y.re (+ (* -1 (/ (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 2)) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (* y.re (+ (* -1/2 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (atan2 x.im x.re) 2))) (exp (* y.im (atan2 x.im x.re))))) (+ (* -1/2 (/ (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (atan2 x.im x.re))) (exp (* y.im (atan2 x.im x.re))))) (+ (* 1/6 (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/6 (/ (* (sin (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (pow (atan2 x.im x.re) 3)) (exp (* y.im (atan2 x.im x.re))))))))))))) (/ (* (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re))))))) (/ (cos (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ 1 (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (/ 1 (exp (* y.im (atan2 x.im x.re)))) (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.re (+ (* 1/2 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)) (exp (* y.im (atan2 x.im x.re))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.re (+ (* y.re (+ (* 1/6 (/ (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)) (exp (* y.im (atan2 x.im x.re))))) (* 1/2 (/ (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (exp (* y.im (atan2 x.im x.re))))))) (/ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (exp (* y.im (atan2 x.im x.re)))))) (/ 1 (exp (* y.im (atan2 x.im x.re)))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 1))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #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.re x.re) (* x.im x.im))) y.re) #s(hole binary64 (+ 1 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* y.re (+ (* 1/6 (* y.re (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3))) (* 1/2 (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (exp (- (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.im (atan2 x.im x.re))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.re (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* -1 (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* -1 (* 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 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (atan2 x.im x.re)))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* 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 (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (+ (* -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 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) #s(hole binary64 (* 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))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) #s(hole binary64 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) #s(hole binary64 (* (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (exp (- (* 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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.re (+ (* 1/2 (/ (PI) y.re)) (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (atan2 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.re (+ (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re) (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (/ (* (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re))))) (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (+ (* 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 (/ (PI) 2))) #s(hole binary64 (* (cos (+ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* y.re (atan2 x.im x.re)))) (sin (* 1/2 (PI))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (/ (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re) (exp (* y.im (atan2 x.im x.re))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) 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.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (/ (* y.im (atan2 x.im x.re)) y.re))))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) #s(hole binary64 (* -1 (* y.re (+ (* -1 (atan2 x.im x.re)) (* -1/2 (/ (PI) y.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.re (+ (* -1 (/ (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.re)) (* -1 (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1/2 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* -1 (* y.im (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/2 (* y.im (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* y.im (+ (* -1/6 (* y.im (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ (* -1 (* y.im (atan2 x.im x.re))) (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))
#s(approx y.im #s(hole binary64 y.im))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (cos (* y.re (atan2 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (* y.re (atan2 x.im x.re))) (* y.im (- (* y.im (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (sin (* y.re (atan2 x.im x.re)))))))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.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))))))) (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* 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 (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))) (* 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)))))))))))
#s(approx (neg y.im) #s(hole binary64 (* -1 y.im)))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* (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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* y.im (+ (* -1 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (+ (* -1/6 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* -1/6 (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* 1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))) (* (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) #s(hole binary64 (+ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (* -1/6 (* y.im (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (atan2 x.im x.re) y.im))) (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))))) #s(hole binary64 (+ (* y.im (- (+ (* y.im (- (+ (* y.im (- (* (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/6 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re)))))) (* (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (+ (* 1/2 (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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)) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re))))) (* (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* 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))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (exp (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re)) (exp (* (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)) (exp (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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)) (exp (* (atan2 x.im x.re) y.im))) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (* (atan2 x.im x.re) y.im)) #s(hole binary64 1))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (exp (* (atan2 x.im x.re) y.im)) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))))) (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))))
#s(approx (+ (* (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos (/ (PI) 2))) (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2)))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (+ (* y.im (+ (* -1/2 (* (cos (* 1/2 (PI))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* y.re (atan2 x.im x.re)))))) (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* y.im (+ (* -1/6 (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))) (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))))))) (* (cos (* 1/2 (PI))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))) (+ (* (cos (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (sin (* y.re (atan2 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* y.re (atan2 x.im x.re))) (* y.im (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 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 (* y.re (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (sin (* 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 (* y.re (atan2 x.im x.re))))) (* -1/6 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 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))) (sin (/ (PI) 2))) #s(hole binary64 (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re)))))) (* -1/2 (* y.im (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))))))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) #s(hole binary64 (+ (* y.im (+ (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.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) (sin (* 1/2 (PI)))))) (* 1/6 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* 1/2 (PI))) (sin (* y.re (atan2 x.im x.re))))))))))) (* (cos (* y.re (atan2 x.im x.re))) (sin (* 1/2 (PI)))))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (cos (+ (* (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 (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (* (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) (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 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (+ (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* y.im (- (* 1/6 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/6 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (pow (atan2 x.im x.re) 2))) (* (- (* -1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))) (atan2 x.im x.re))))))) (+ (* 1/2 (* (cos (* y.re (atan2 x.im x.re))) (* (pow (atan2 x.im x.re) 2) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (- (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (* (sin (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))) (atan2 x.im x.re)))))) (* (cos (* y.re (atan2 x.im x.re))) (* (atan2 x.im x.re) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))) (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re)))
#s(approx (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.im (- (* -1 (* y.im (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (/ (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow (exp (atan2 x.im x.re)) y.im)) #s(hole binary64 (+ (* y.im (- (* y.im (- (* -1 (* y.im (+ (* -1 (* (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))) (atan2 x.im x.re))) (+ (* -1/2 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))) (* 1/6 (* (pow (atan2 x.im x.re) 3) (pow (sqrt (+ (pow x.im 2) (pow x.re 2))) y.re))))))) (+ (* -1 (* (pow (atan2 x.im x.re) 2) (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)))))) (* (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 (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 1))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (+ 1 (* y.im (atan2 x.im x.re)))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (+ 1 (* y.im (+ (* 1/2 (* y.im (pow (atan2 x.im x.re) 2))) (atan2 x.im x.re))))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(hole binary64 (+ 1 (* y.im (+ (* y.im (+ (* 1/6 (* y.im (pow (atan2 x.im x.re) 3))) (* 1/2 (pow (atan2 x.im x.re) 2)))) (atan2 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* -1/2 (* y.im (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (+ (* y.im (+ (* -1/2 (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (* 1/2 (PI))))) (* -1/6 (* y.im (* (cos (* 1/2 (PI))) (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 3)))))) (* (cos (* 1/2 (PI))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (sin (* 1/2 (PI)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (+ (sin (* 1/2 (PI))) (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* y.im (- (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im) (atan2 x.im x.re)))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* -1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 2) (- (/ (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (pow y.im 2)) (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* 1/2 (* (pow y.im 2) (* (pow (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) 2) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* (pow y.im 2) (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -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)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* 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)))))) (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (+ (* 1/2 (/ (PI) y.im)) (/ (* y.re (atan2 x.im x.re)) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* y.im (+ (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (/ (* y.re (atan2 x.im x.re)) y.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) #s(hole binary64 (sin (+ (* 1/2 (PI)) (* y.im (log (sqrt (+ (pow x.im 2) (pow x.re 2)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* y.im (- (/ (sin (* 1/2 (PI))) y.im) (* -1 (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (* y.re (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) y.im)) (* -1 (atan2 x.im x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) #s(hole binary64 (* (pow y.im 2) (- (* -1 (/ (- (* -1 (/ (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)))))) 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))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) #s(hole binary64 (* -1 (* y.im (+ (* -1 (/ (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) 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)))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) y.im)))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (* -1 (* y.im (+ (* -1 (log (sqrt (+ (pow x.im 2) (pow x.re 2))))) (* -1 (/ (* y.re (atan2 x.im x.re)) y.im)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) #s(hole binary64 (* -1 (* y.im (- (* -1 (/ (sin (* 1/2 (PI))) y.im)) (* (log (sqrt (+ (pow x.im 2) (pow x.re 2)))) (sin (PI))))))))

Outputs
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))
(*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)
(log.f64 (hypot.f64 x.re x.im))
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re x.im)
x.re
x.im
y.re
(*.f64 (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))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
(-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (.f64 y.re (atan2.f64 x.im x.re)))
#s(literal 1/2 binary64)
(PI.f64)
(*.f64 y.re (atan2.f64 x.im x.re))
(.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))
(neg.f64 y.im)
(fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))
#s(literal -1/2 binary64)
(.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
(.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
(*.f64 (neg.f64 (log.f64 (hypot.f64 x.im x.re))) (neg.f64 (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (fabs.f64 (log.f64 (hypot.f64 x.im x.re))) (fabs.f64 (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))
(pow.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (log.f64 (hypot.f64 x.im x.re))) #s(literal 2 binary64)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (log.f64 (hypot.f64 x.im x.re))))
(.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))
(log.f64 (hypot.f64 x.im x.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im x.re)
(exp.f64 (.f64 (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) #s(literal 1/2 binary64)))
(.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
(sin.f64 (+.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (.f64 (cos.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 1 binary64)))
(+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
(*.f64 #s(literal -1 binary64) x.im)
#s(literal -1 binary64)
(*.f64 (atan2.f64 x.im x.re) y.re)
(/.f64 (neg.f64 (PI.f64)) #s(literal -2 binary64))
(/.f64 (PI.f64) #s(literal 2 binary64))
#s(literal 2 binary64)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (log.f64 (exp.f64 (atan2.f64 x.im x.re))) y.im))
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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))) x.im)) y.im)) (sin.f64 (*.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))) 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))) x.im)) 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))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 (sin.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re)) (.f64 (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im)) (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))) 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))) x.im)) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im)) (sin.f64 (*.f64 (atan2.f64 x.im x.re) y.re))))
(fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re))
(+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(literal 0 binary64)
(.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64))
(fma.f64 (sin.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64) (.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im 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))) x.im)) y.im)) (sin.f64 (*.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))) 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))) x.im)) 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))) x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re))) #s(literal 0 binary64)) (.f64 (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
#s(literal 1 binary64)
(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
(/.f64 (neg.f64 (pow.f64 (hypot.f64 x.re x.im) y.re)) (neg.f64 (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)))
(/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im))
(exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(pow.f64 (exp.f64 (log.f64 (hypot.f64 x.re x.im))) y.re)
(pow.f64 (hypot.f64 x.re x.im) y.re)
(pow.f64 (fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (hypot.f64 x.re x.im)) y.re))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (sinh.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)))
(pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)
(exp.f64 (*.f64 (log.f64 (exp.f64 (atan2.f64 x.im x.re))) y.im))
(exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im))
(+.f64 (cosh.f64 (.f64 (atan2.f64 x.im x.re) y.im)) (sinh.f64 (.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (atan2.f64 x.im x.re))
(+.f64 (cosh.f64 (atan2.f64 x.im x.re)) (sinh.f64 (atan2.f64 x.im x.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
(-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
(sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(*.f64 #s(literal 1/2 binary64) (PI.f64))
(.f64 (neg.f64 y.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
(*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))
(log.f64 (pow.f64 (hypot.f64 x.im x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) #s(literal 0 binary64)) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (/.f64 (PI.f64) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (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)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.im))) (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))) (+.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.im)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.im)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx x.re x.re)
#s(approx (* (atan2 x.im x.re) y.im) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64)))))))) (/.f64 (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (.f64 (log.f64 x.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))) (.f64 (pow.f64 (log.f64 x.im) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (/.f64 (.f64 (.f64 x.re x.re) (log.f64 x.im)) (*.f64 x.im x.im)) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (/.f64 (log.f64 x.im) (.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.im) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (log.f64 x.im) (*.f64 x.im x.im))) (pow.f64 (log.f64 x.im) #s(literal 2 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.im))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.im x.im) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.im)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) x.im))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (.f64 (.f64 x.im x.im) x.im)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.im (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 x.im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.im x.im) x.im) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.im #s(literal -1 binary64)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im)))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.im x.im)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.im) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))) (.f64 x.im x.im)) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.im))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.im x.im)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.im) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))) (fma.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (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/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))) (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/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.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))) (/.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (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))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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.re x.re) (* x.im x.im))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (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))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64))))))) (pow.f64 x.im y.re)))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (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))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im 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))) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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.re x.re) (* x.im x.im))) y.re) (pow.f64 x.im y.re))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 x.im y.re))) (.f64 x.im x.im)) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re)))) (pow.f64 x.im y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.im y.re)) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 4 binary64))))) (pow.f64 x.im y.re) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))
#s(approx (exp (atan2 x.im x.re)) (exp.f64 (atan2.f64 x.im x.re)))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.im)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.im #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.im #s(literal 6 binary64)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.im) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) #s(literal 0 binary64))) (.f64 (.f64 x.re x.re) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 x.im) #s(literal 0 binary64)))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im)) (.f64 (log.f64 x.im) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.im) #s(literal 0 binary64) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.im x.im)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.im) #s(literal 0 binary64) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) x.re)
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.re x.re)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.re x.re))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re))) (fma.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 y.im (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))) (fma.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (neg.f64 (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re)))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (.f64 (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (neg.f64 (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) x.re)
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) 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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (pow.f64 x.re #s(literal -1 binary64)) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (neg.f64 (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 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)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.re x.re)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.re x.re))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re))) (fma.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))))))) (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))) (fma.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.im #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (.f64 x.re x.re)) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (pow.f64 x.re #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.re x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))) (pow.f64 x.re #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.re #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))))) (.f64 x.re x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 6 binary64)) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.re) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (*.f64 x.re x.re)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.re)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (exp.f64 (*.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 y.re (log.f64 x.re)))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 y.re (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx x.im x.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal -1 binary64) (.f64 (.f64 x.im x.im) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))) (.f64 #s(literal 1/6 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))))) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64)))))))) (/.f64 (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64))))) (/.f64 (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 (.f64 x.im x.im) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (.f64 (log.f64 x.re) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) (.f64 (pow.f64 (log.f64 x.re) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (+.f64 (/.f64 (.f64 (.f64 x.im x.im) (log.f64 x.re)) (*.f64 x.re x.re)) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (/.f64 (log.f64 x.re) (.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 x.re) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal -1 binary64))))))) (/.f64 (log.f64 x.re) (*.f64 x.re x.re))) (pow.f64 (log.f64 x.re) #s(literal 2 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 x.re))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (+.f64 (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 x.re x.re) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) x.re))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (.f64 (.f64 x.re x.re) x.re)) (.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 x.re (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 x.re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (.f64 x.re x.re) x.re) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 x.re #s(literal -1 binary64)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re)))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (*.f64 x.re x.re)))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 x.re) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))) (.f64 x.re x.re)) (fma.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (/.f64 (exp.f64 (.f64 y.re (log.f64 x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (*.f64 x.re x.re)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64))))))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 x.re) (fma.f64 y.re (atan2.f64 x.im x.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 x.re #s(literal 6 binary64)))))))))))
#s(approx (* -1 x.im) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))) (fma.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (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/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))) (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/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.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))) (/.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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (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))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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.re x.re) (* x.im x.im))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) 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 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)))) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64))))))) (pow.f64 x.re y.re)))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))) (/.f64 (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 (*.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (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))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 x.re y.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 (.f64 x.re x.re) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (/.f64 (fma.f64 (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.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.re x.re) (* x.im x.im))) y.re) (pow.f64 x.re y.re))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 x.re y.re))) (.f64 x.re x.re)) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re)))) (pow.f64 x.re y.re)))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 x.re y.re)) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 4 binary64))))) (pow.f64 x.re y.re) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.im (log.f64 x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 x.re)))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 x.re #s(literal 6 binary64))) (*.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 x.re #s(literal 6 binary64)))))))))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 6 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 x.re) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (*.f64 x.re x.re)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re)) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) #s(literal 0 binary64))) (.f64 (.f64 x.im x.im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))))))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (log.f64 x.re) #s(literal 0 binary64)))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (.f64 x.re x.re)) (.f64 (log.f64 x.re) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.re) #s(literal 0 binary64) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.re x.re)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 (log.f64 x.re) #s(literal 0 binary64) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 0 binary64) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) #s(literal 0 binary64)) (pow.f64 x.re #s(literal 6 binary64))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im)))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 y.im (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64)))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (*.f64 x.im x.im)) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 2 binary64))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (*.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (.f64 y.re (-.f64 #s(literal 0 binary64) (log.f64 x.im)))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 #s(literal 0 binary64) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)))) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.im (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 y.im (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 #s(literal 0 binary64) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 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)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (*.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 x.im x.im))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (.f64 #s(literal 1/720 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (*.f64 x.im x.im)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im))) (fma.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 y.im (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))))))) (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (+.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im))) (fma.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 x.re #s(literal 4 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.im #s(literal 4 binary64)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 x.im x.im)) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))
#s(approx (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/360 binary64) (/.f64 (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (pow.f64 x.im #s(literal 4 binary64))) (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) #s(literal -1 binary64))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (fma.f64 #s(literal -1 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 x.im x.im))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 x.im x.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64)))) (fma.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))) (pow.f64 x.im #s(literal 6 binary64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (*.f64 (pow.f64 x.im #s(literal 4 binary64)) (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)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (*.f64 (pow.f64 x.im #s(literal 6 binary64)) (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))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) 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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (*.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (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))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (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))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 (.f64 x.im x.im) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im)) (/.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))))) (.f64 x.im x.im))) (/.f64 (fma.f64 (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 6 binary64)) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.re))) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re))) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))))) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (log.f64 (pow.f64 (/.f64 #s(literal -1 binary64) x.im) y.im)) (.f64 #s(literal 1/2 binary64) (PI.f64))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (*.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (.f64 y.im (*.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im #s(literal 0 binary64))) (.f64 x.im x.im))) (+.f64 (.f64 #s(literal -1/720 binary64) (/.f64 (.f64 y.im (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im #s(literal 0 binary64))) (pow.f64 x.im #s(literal 4 binary64)))) (.f64 y.im (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (*.f64 x.im x.im)))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 binary64)) (.f64 x.im x.im))))))
#s(approx (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 x.im)) #s(literal 0 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) #s(literal 0 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 #s(literal 0 binary64) (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) #s(literal 0 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)))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (*.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.re (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (*.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 y.re (-.f64 (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.re (-.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.re (-.f64 (fma.f64 y.re (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 y.re (-.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal 1/12 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.re (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.re (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 #s(literal 1/2 binary64) (PI.f64)))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (.f64 y.re (+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 y.re (fma.f64 #s(literal 1/12 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 y.re (fma.f64 #s(literal 1/12 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))))))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (fma.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))) (.f64 y.re (fma.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (+.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))) (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 y.re (-.f64 (.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re)))))) (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (atan2.f64 x.im x.re)))))))) (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (atan2.f64 x.im x.re))))))) (fma.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))) (.f64 (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 y.re (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (.f64 y.re (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (sin.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (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)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (*.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/6 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (fma.f64 (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (.f64 y.re (fma.f64 y.re (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (*.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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 (/ (PI) 2))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (atan2.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (sin.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))))))))) (/.f64 (.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (/.f64 (fma.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (/.f64 (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re))))) (/.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)))) (pow.f64 (pow.f64 (exp.f64 y.im) (atan2.f64 x.im x.re)) #s(literal -1 binary64))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) #s(literal 1 binary64))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (*.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))))
#s(approx (pow (sqrt (+ (* x.re x.re) (* x.im x.im))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (log.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.re (+.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))
#s(approx (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))))) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (*.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (*.f64 y.re (+.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (/.f64 (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.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))) (/.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.re x.re) (* x.im x.im))) 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))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.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 (sin.f64 (+.f64 (fma.f64 y.im (log.f64 (hypot.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (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))) (/.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.re x.re) (* x.im x.im))) y.re) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (*.f64 #s(literal -1/2 binary64) (/.f64 (PI.f64) y.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im))) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 y.im (*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (fma.f64 #s(literal -1 binary64) (*.f64 y.im (atan2.f64 x.im x.re)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx y.im y.im)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 y.im (-.f64 (.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (neg y.im) (*.f64 #s(literal -1 binary64) y.im))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (pow.f64 (hypot.f64 x.im x.re) y.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (-.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (fma.f64 y.im (-.f64 (.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (fma.f64 #s(literal 1/6 binary64) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (-.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))) (.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (-.f64 (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(literal 1 binary64))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 y.im (+.f64 (.f64 #s(literal -1/6 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))))))) (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 y.im (+.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (sin (/ (PI) 2))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (*.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re))) (.f64 y.im (-.f64 (.f64 #s(literal 1/6 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re))))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)))))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 x.im x.re) y.re))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (hypot.f64 x.im x.re) y.re))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (fma.f64 y.im (-.f64 (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))) (atan2.f64 x.im x.re)) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re))))))) (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (hypot.f64 x.im x.re) y.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) #s(literal 1 binary64))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (+.f64 #s(literal 1 binary64) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal 1/2 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (atan2.f64 x.im x.re)))))
#s(approx (pow (exp (atan2 x.im x.re)) y.im) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal 1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (*.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (fma.f64 y.im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 (log.f64 (hypot.f64 x.im x.re)) (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re)))))))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re)))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (sin.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (+.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64)))))
#s(approx (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (*.f64 y.im (-.f64 (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 y.im y.im) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (.f64 (.f64 y.im y.im) (-.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) y.im) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (.f64 (.f64 y.im y.im) (-.f64 (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im y.im)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) y.im) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 y.im y.im) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) y.im) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) y.im))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.im) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (hypot.f64 x.im x.re)) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (sin.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (PI.f64)) (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.im)))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 y.im (.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 y.im (-.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) y.im) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (log.f64 (pow.f64 (hypot.f64 x.im x.re) y.re)) y.im)) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (* (neg y.im) (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))))) (.f64 (.f64 y.im y.im) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) y.im)) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re)))) y.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (+ (* -1/2 (* y.im (* (* (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (sin (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re))))))) (* (cos (+ (* 1/2 (PI)) (* y.re (atan2 x.im x.re)))) (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))) y.im) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))) y.im))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (hypot.f64 x.im x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (sin (* 1/2 (PI))) (* (neg y.im) (* (sin (+ (* 1/2 (PI)) (/ (PI) 2))) (log (sqrt (+ (* x.im x.im) (* x.re x.re))))))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) y.im)) (*.f64 (log.f64 (hypot.f64 x.im x.re)) #s(literal 0 binary64))))))

eval307.0ms (2.8%)

Memory: -5.0MiB live, 363.7MiB allocated; 78ms collecting garbage
Compiler: Compiled 193 375 to 10 679 computations (94.5% saved)

prune1.0s (9%)

Memory

31.6MiB live, 755.0MiB allocated; 202ms collecting garbage

Pruning

10 alts after pruning (2 fresh and 8 done)

	Pruned	Kept	Total
New	1 539	2	1 541
Fresh	0	0	0
Picked	1	3	4
Done	0	5	5
Total	1 540	10	1 550

Accuracy

98.4%

Counts

1 550 → 10

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	79.2%	(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (pow.f64 (exp.f64 (atan2.f64 x.im x.re)) y.im)) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (sin (+ (* y.im (log (pow (+ (* x.im x.im) (* x.re x.re)) 1/2))) (/ (PI) 2))) (-.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64))) (.f64 (neg.f64 y.im) (*.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (log.f64 (hypot.f64 x.im x.re))))))))
✓	76.3%	(.f64 (/.f64 (pow.f64 (hypot.f64 x.re x.im) y.re) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	36.1%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) x.im)) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	35.9%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
	38.4%	(.f64 (/.f64 (exp.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re)) (exp.f64 (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (/.f64 (PI.f64) #s(literal 2 binary64)))) (sin.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal 1/2 binary64) (PI.f64)))))))
✓	83.7%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (hypot.f64 x.re x.im)) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	43.5%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
✓	71.0%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (neg.f64 y.im) (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (.f64 (log.f64 (hypot.f64 x.im x.re)) (log.f64 (hypot.f64 x.im x.re))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (hypot.f64 x.im x.re))))))))
✓	42.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))))
✓	50.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))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (pow.f64 (fma.f64 x.im x.im (.f64 x.re x.re)) #s(literal 1/2 binary64))) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))))))

Compiler

Compiled 1 868 to 534 computations (71.4% saved)

regimes51.0ms (0.5%)

Memory

-19.8MiB live, 65.9MiB allocated; 21ms collecting garbage

Counts

24 → 2

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes22.0ms (0.2%)

Memory

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

Counts

14 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
78.0%	4	`x.re`
82.4%	3	`x.im`
80.1%	3	`y.im`
80.0%	3	`y.re`
78.9%	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))))`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes8.0ms (0.1%)

Memory

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

Counts

13 → 2

Calls

Call 1

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

Outputs

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

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

Calls

2 calls:

4.0ms

x.im

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
78.9%	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))))`
79.2%	3	`x.im`

Compiler

Compiled 38 to 23 computations (39.5% saved)

regimes17.0ms (0.1%)

Memory

-26.3MiB live, 20.6MiB allocated; 2ms collecting garbage

Counts

12 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

4 calls:

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

Results

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

Compiler

Compiled 40 to 31 computations (22.5% saved)

regimes11.0ms (0.1%)

Memory

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

Counts

5 → 3

Calls

Call 1

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

Outputs

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

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

Calls

5 calls:

2.0ms	y.im
2.0ms	x.im
2.0ms	x.re
2.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
49.0%	1	`y.im`
60.7%	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))))`
49.0%	1	`y.re`
68.4%	3	`x.re`
66.3%	3	`x.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes6.0ms (0.1%)

Memory

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

Counts

4 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

2.0ms

x.re

2.0ms

x.im

1.0ms

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

Results

Accuracy	Segments	Branch
34.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))))`
59.8%	2	`x.im`
60.3%	3	`x.re`

Compiler

Compiled 39 to 27 computations (30.8% saved)

regimes4.0ms (0%)

Memory

-40.9MiB live, 5.4MiB allocated; 2ms collecting garbage

Counts

2 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

2 calls:

2.0ms	x.re
1.0ms	x.im

Results

Accuracy	Segments	Branch
52.8%	2	`x.re`
52.1%	2	`x.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes5.0ms (0%)

Memory

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

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs

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

Outputs

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

Calls

5 calls:

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

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	-inf	-0.0

Compiler

Compiled 40 to 26 computations (35% saved)

bsearch84.0ms (0.8%)

Memory

3.1MiB live, 61.7MiB allocated; 32ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
48.0ms	4.299566775231435e+47	1.8015550446161594e+51
30.0ms	-6.483934272977315e-262	-2.5948208631693665e-267

Samples

45.0ms	76×	1	valid
21.0ms	196×	0	valid

Compiler

Compiled 1 882 to 1 228 computations (34.8% saved)

Precisions

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

ival-log: 27.0ms (47.4% of total)

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

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

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

adjust: 3.0ms (5.3% of total)

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

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

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

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

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.8333206788968396	0.9397637217525857

Compiler

Compiled 40 to 26 computations (35% saved)

bsearch33.0ms (0.3%)

Memory

-18.9MiB live, 28.1MiB allocated; 7ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.299566775231435e+47	1.8015550446161594e+51
29.0ms	-5.953304321460177e+170	-1.4349762538252023e+169

Samples

15.0ms	34×	1	valid
8.0ms	78×	0	valid

Compiler

Compiled 1 917 to 1 174 computations (38.8% saved)

Precisions

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

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

ival-mult!: 3.0ms (20.1% of total)

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

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

adjust: 1.0ms (6.7% of total)

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

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

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

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

bsearch83.0ms (0.7%)

Memory

36.2MiB live, 81.2MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
40.0ms	5.2577313695508165e-27	0.00016480714278800066
37.0ms	-3.5372419406286306e+153	-1.1822399461687249e+127

Samples

32.0ms	109×	1	valid
27.0ms	243×	0	valid

Compiler

Compiled 3 285 to 1 981 computations (39.7% saved)

Precisions

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

ival-mult!: 10.0ms (21.4% of total)

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

ival-log: 8.0ms (17.1% of total)

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

adjust: 4.0ms (8.6% of total)

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

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

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

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

bsearch25.0ms (0.2%)

Memory

-21.8MiB live, 23.4MiB allocated; 4ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
23.0ms	-8.751890661440024e-287	4.1225837208121915e-305

Samples

12.0ms	36×	1	valid
6.0ms	60×	0	valid

Compiler

Compiled 838 to 455 computations (45.7% saved)

Precisions

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

adjust: 3.0ms (19.2% of total)

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

ival-mult!: 3.0ms (19.2% of total)

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

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

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

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

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

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

bsearch20.0ms (0.2%)

Memory

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

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
18.0ms	1.5599368970848744e-282	4.106544766497044e-282

Samples

9.0ms	30×	1	valid
5.0ms	50×	0	valid

Compiler

Compiled 650 to 343 computations (47.2% saved)

Precisions

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

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

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

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

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

adjust: 1.0ms (8.7% of total)

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

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

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

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

derivations190.0ms (1.7%)

Memory

-22.7MiB live, 114.7MiB allocated; 14ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 268 to 169 computations (86.7% saved)

preprocess90.0ms (0.8%)

Memory: 26.5MiB live, 118.2MiB allocated; 14ms collecting garbage
Compiler: Compiled 2 610 to 376 computations (85.6% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze342.0ms (3.1%)

sample2.2s (19.3%)

explain369.0ms (3.3%)

preprocess82.0ms (0.7%)

series201.0ms (1.8%)

rewrite218.0ms (2%)

eval553.0ms (5%)

prune102.0ms (0.9%)

series944.0ms (8.5%)

rewrite346.0ms (3.1%)

eval190.0ms (1.7%)

prune558.0ms (5%)

series394.0ms (3.5%)

rewrite497.0ms (4.5%)

eval218.0ms (2%)

prune967.0ms (8.7%)

series535.0ms (4.8%)

rewrite502.0ms (4.5%)

eval307.0ms (2.8%)

prune1.0s (9%)

regimes51.0ms (0.5%)

regimes22.0ms (0.2%)

regimes8.0ms (0.1%)

regimes17.0ms (0.1%)

regimes11.0ms (0.1%)

regimes6.0ms (0.1%)

regimes4.0ms (0%)

regimes5.0ms (0%)

bsearch1.0ms (0%)

bsearch84.0ms (0.8%)

bsearch1.0ms (0%)

bsearch33.0ms (0.3%)

bsearch83.0ms (0.7%)

bsearch25.0ms (0.2%)

bsearch20.0ms (0.2%)

derivations190.0ms (1.7%)

preprocess90.0ms (0.8%)

end0.0ms (0%)

Profiling