Metrics for powComplex, real part

start0.0ms (0%)

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

analyze465.0ms (4.7%)

Memory

-23.0MiB live, 420.9MiB allocated; 70ms 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)

sample3.7s (37.1%)

Memory

135.6MiB live, 3 756.2MiB allocated; 1.3s collecting garbage

Samples

2.1s	2 969×	1	valid
926.0ms	5 287×	0	valid

Precisions

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

ival-cos: 675.0ms (25.4% of total)

ival-hypot: 522.0ms (19.6% of total)

ival-log: 469.0ms (17.6% of total)

ival-mult!: 381.0ms (14.3% of total)

adjust: 231.0ms (8.7% of total)

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

ival-atan2: 110.0ms (4.1% of total)

ival-add!: 91.0ms (3.4% of total)

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

Bogosity

preprocess40.0ms (0.4%)

Memory

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

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	141	575
1	531	556
2	1959	554

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Status

Accuracy

Program

▶

43.3%

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

Compiler

Compiled 74 to 38 computations (48.6% saved)

series248.0ms (2.5%)

Memory

-41.7MiB live, 258.6MiB allocated; 70ms collecting garbage

Counts

19 → 267

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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 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)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (pow x.im 2)) 4))) (+ (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4)))))) (pow (sqrt (pow x.im 2)) 2))) (+ (* (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 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)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.re 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (exp (- (* (log (sqrt (+ (* 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)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.re 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 4))))) (* (pow x.re 2) (* (exp (- (* y.re (log (sqrt (pow x.im 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.im 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.im 2)) 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 (sqrt (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/2 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (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 (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 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) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 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 (sqrt (pow x.im 2))))))
#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 (sqrt (pow x.im 2)) 2))) (* y.re (log (sqrt (pow x.im 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) (+ (* -1/4 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.im 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) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.re) (pow (sqrt (pow x.im 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.im 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* 1/2 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* -1/4 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.im 2))) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/6 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.im 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* 1/2 (/ (pow x.re 2) (sqrt (pow x.im 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* -1/8 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.im 2)) (* (pow x.re 2) (+ (* (pow x.re 2) (- (* 1/16 (/ (pow x.re 2) (pow (sqrt (pow x.im 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.im 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.im 2)))))))))
#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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.re 2) (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.im 2)) 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* 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 (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))) (* (pow x.re 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 6))) (* (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.im 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.im 2)) 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* y.re (atan2 x.im x.re)))))
#s(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 (sqrt (pow x.im 2)) 2))) (+ (* y.im (log (sqrt (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 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 6)))))))))))
#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))))))
#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 (sqrt (pow x.im 2)) 2))) (* y.im (log (sqrt (pow x.im 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* -1/4 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.im 2)))) (* (pow x.re 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.im 2)) 2))) (* (pow x.re 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.im 2)) 4))) (* 1/6 (/ (* (pow x.re 2) y.im) (pow (sqrt (pow x.im 2)) 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 (+ 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) (+ 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 (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (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.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(hole binary64 (+ (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ (* y.im (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))) (pow (sqrt (pow x.re 2)) 4))) (+ (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4)))))) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (+ (* -1/2 (/ (* y.im (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* 1/2 (/ (* y.re (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (- (* -1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4)))))) (pow (sqrt (pow x.re 2)) 2))) (+ (* (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 6))))))) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 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 (sqrt (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.re 2)))) (* y.im (atan2 x.im x.re)))) (* 1/2 (/ (* (pow x.im 2) (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))))) (pow (sqrt (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))) #s(hole binary64 (+ (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (* (pow x.im 2) (+ (* 1/2 (/ (* y.re (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 4))))) (* (pow x.im 2) (* (exp (- (* y.re (log (sqrt (pow x.re 2)))) (* y.im (atan2 x.im x.re)))) (+ (* -1/8 (/ (pow y.re 2) (pow (sqrt (pow x.re 2)) 6))) (+ (* 1/48 (/ (pow y.re 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.re (pow (sqrt (pow x.re 2)) 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 (sqrt (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/2 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (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.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 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.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 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 (sqrt (pow x.re 2))))))
#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 (sqrt (pow x.re 2)) 2))) (* y.re (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) #s(hole binary64 (+ (* y.re (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.re (pow (sqrt (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.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.re (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.re (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.re) (pow (sqrt (pow x.re 2)) 6))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (log (sqrt (pow x.re 2)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* 1/2 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* -1/4 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) #s(hole binary64 (+ (log (sqrt (pow x.re 2))) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/6 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 6))) (* 1/4 (/ 1 (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ 1 (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (sqrt (pow x.re 2))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* 1/2 (/ (pow x.im 2) (sqrt (pow x.re 2)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* -1/8 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 3))) (* 1/2 (/ 1 (sqrt (pow x.re 2)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) #s(hole binary64 (+ (sqrt (pow x.re 2)) (* (pow x.im 2) (+ (* (pow x.im 2) (- (* 1/16 (/ (pow x.im 2) (pow (sqrt (pow x.re 2)) 5))) (* 1/8 (/ 1 (pow (sqrt (pow x.re 2)) 3))))) (* 1/2 (/ 1 (sqrt (pow x.re 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 (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (* -1/2 (/ (* (pow x.im 2) (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))) (pow (sqrt (pow x.re 2)) 2))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* 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 (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(hole binary64 (+ (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* 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 (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))) (* (pow x.im 2) (- (* 1/8 (/ (* (pow y.im 2) (cos (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 6))) (* (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))) (+ (* -1/48 (/ (pow y.im 3) (pow (sqrt (pow x.re 2)) 6))) (* 1/6 (/ y.im (pow (sqrt (pow x.re 2)) 6)))))))) (* -1/4 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 4))))) (* 1/2 (/ (* y.im (sin (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))) (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re)))))
#s(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 (sqrt (pow x.re 2)) 2))) (+ (* y.im (log (sqrt (pow x.re 2)))) (* y.re (atan2 x.im x.re))))))
#s(approx (+ (* (log (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.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2)))))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (+ (* y.re (atan2 x.im x.re)) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 6)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (* y.im (log (sqrt (pow x.re 2))))))
#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 (sqrt (pow x.re 2)) 2))) (* y.im (log (sqrt (pow x.re 2)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* -1/4 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 4))) (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) #s(hole binary64 (+ (* y.im (log (sqrt (pow x.re 2)))) (* (pow x.im 2) (+ (* 1/2 (/ y.im (pow (sqrt (pow x.re 2)) 2))) (* (pow x.im 2) (+ (* -1/4 (/ y.im (pow (sqrt (pow x.re 2)) 4))) (* 1/6 (/ (* (pow x.im 2) y.im) (pow (sqrt (pow x.re 2)) 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)))) (* -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 (+ (/ (* 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.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
88.0ms	y.re	0
19.0ms	y.im	inf
17.0ms	x.im	0
15.0ms	x.re	inf
14.0ms	y.re	inf

rewrite213.0ms (2.2%)

Memory

27.1MiB live, 258.3MiB allocated; 30ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1597	20973
0	1627	20387
0	8211	17555

Stop Event

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

Counts

286 → 333

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

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

eval49.0ms (0.5%)

Memory: 21.3MiB live, 109.2MiB allocated; 14ms collecting garbage
Compiler: Compiled 29 586 to 2 658 computations (91% saved)

prune51.0ms (0.5%)

Memory

-33.6MiB live, 27.4MiB allocated; 9ms collecting garbage

Pruning

18 alts after pruning (18 fresh and 0 done)

	Pruned	Kept	Total
New	305	18	323
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	306	18	324

Accuracy

96.2%

Counts

324 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	80.4%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
▶	44.1%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sin.f64 (+.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (*.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))))
	37.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))
	43.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
	52.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 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))))
	42.8%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 #s(literal 1 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))))))
▶	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))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
	24.6%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	36.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.re))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	32.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	14.9%	(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (.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))))
	35.7%	(.f64 (exp.f64 (-.f64 #s(approx ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	32.8%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	30.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	34.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
▶	40.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
▶	55.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	30.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))

Compiler

Compiled 1 872 to 1 052 computations (43.8% saved)

series421.0ms (4.3%)

Memory

31.5MiB live, 639.8MiB allocated; 119ms collecting garbage

Counts

56 → 466

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

Calls

12 calls:

Time	Variable	Point
55.0ms	y.im	0
53.0ms	y.re	0
48.0ms	x.re	inf
38.0ms	y.re	-inf
32.0ms	x.im	inf

rewrite392.0ms (4%)

Memory

-11.7MiB live, 558.8MiB allocated; 125ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2975	39860
0	3069	38669
0	10886	35935

Stop Event

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

Counts

522 → 621

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

Outputs
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.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 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.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 (fma.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 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re (neg.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
(sin.f64 (+.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (cos.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (sqrt.f64 (fma.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 (fma.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 (fma.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im x.re)
(/.f64 (+.f64 (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 (.f64 x.im x.im) (.f64 x.im x.im) (-.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.im) (neg.f64 x.im) (*.f64 x.re x.re))
(fma.f64 x.im x.im (*.f64 x.re x.re))
(+.f64 (.f64 x.im x.im) (.f64 x.re x.re))
(*.f64 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.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 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))))
(/.f64 (exp.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.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 (fma.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 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (+.f64 (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (.f64 x.re x.re) (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(literal -1 binary64)
(*.f64 y.im (neg.f64 (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.im) y.im))
(*.f64 #s(literal -1 binary64) (log.f64 x.im))
(neg.f64 (log.f64 x.im))
(-.f64 #s(literal 0 binary64) (log.f64 x.im))
(log.f64 (/.f64 #s(literal 1 binary64) x.im))
(log.f64 x.im)
(/.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) #s(literal 3 binary64)) (pow.f64 (.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))
(*.f64 y.re (neg.f64 (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.im) y.re))
(*.f64 y.im (atan2.f64 x.im x.re))
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(sin.f64 (+.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64))))
(fma.f64 (sin.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (cos.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im)) (cos.f64 (.f64 (atan2.f64 x.im x.re) y.re))) (.f64 (sin.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re))))
(cos.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)))
(+.f64 (.f64 (sin.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (-.f64 (.f64 (/.f64 (PI.f64) #s(literal 2 binary64)) (/.f64 (PI.f64) #s(literal 2 binary64))) (.f64 (fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im (.f64 (atan2.f64 x.im x.re) y.re)) (/.f64 (PI.f64) #s(literal 2 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) #s(literal 3 binary64)) (pow.f64 (.f64 (atan2.f64 x.im x.re) y.re) #s(literal 3 binary64))) (fma.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (.f64 (atan2.f64 x.im x.re) y.re)))))
(fma.f64 (log.f64 (sqrt.f64 (fma.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 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))
(log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re x.im)
(/.f64 (+.f64 (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 (.f64 x.re x.re) (.f64 x.re x.re) (-.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
(fma.f64 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.f64 x.re) (*.f64 x.im x.im))
(fma.f64 x.re x.re (*.f64 x.im x.im))
(+.f64 (.f64 x.re x.re) (.f64 x.im x.im))
(/.f64 (neg.f64 (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 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 (sqrt.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.re (log.f64 (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 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 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.re (log.f64 (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 (.f64 x.im x.im) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 5/2 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#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 (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.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 (sqrt.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 y.im (log.f64 (sqrt.f64 (.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 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (log.f64 (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (* (atan2 x.im x.re) y.re) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (fma.f64 x.im x.im (*.f64 x.re x.re)))
#s(approx (* x.re x.re) (*.f64 x.re x.re))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (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 (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 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 (sqrt.f64 (.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/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 y.im (log.f64 (sqrt.f64 (.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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))))
#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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) 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 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (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)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64)))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.re x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.im) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (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)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 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 (sqrt.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.re (log.f64 (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 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 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.re (log.f64 (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.re x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 (.f64 x.re x.re) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 5/2 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx x.im x.im)
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.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 (sqrt.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (.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 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (log.f64 (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (* y.im (neg (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 x.im))))
#s(approx (neg (log x.im)) (neg.f64 (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* -1 (* y.re (neg (log x.im)))) (*.f64 y.re (log.f64 x.im)))
#s(approx (* y.re (neg (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 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 (sqrt.f64 (.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/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 y.im (log.f64 (sqrt.f64 (.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/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))))
#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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) 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 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#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 (* y.im (neg (log x.im))) (*.f64 y.im (neg.f64 (log.f64 x.im))))
#s(approx (neg (log x.im)) (neg.f64 (log.f64 x.im)))
#s(approx (* y.re (neg (log x.im))) (*.f64 y.re (neg.f64 (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#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 (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (fma.f64 #s(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) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64)))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.f64 #s(literal -1 binary64) x.im))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (*.f64 x.im x.im)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (*.f64 y.re (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.im) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)) (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (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)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
#s(approx y.re y.re)
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.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 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im))))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (atan2.f64 x.im x.re))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal -1/6 binary64) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (atan2.f64 x.im x.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.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.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)) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
#s(approx (+ (* -1 (* y.im (neg (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 (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.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)) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (/.f64 (PI.f64) y.re) (+.f64 (/.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.re) (atan2.f64 x.im x.re)))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) y.re) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (neg (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 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (+.f64 (neg.f64 (log.f64 x.im)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
#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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))
#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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))
#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)) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))
#s(approx y.im y.im)
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.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)) (/ (PI) 2))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.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)) (/ (PI) 2))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.im) (log.f64 x.im))))) (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.im) (log.f64 x.im))) (.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 (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))))
#s(approx (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2))) (+.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 y.im (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 y.im (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (+ (* -1 (* y.im (neg (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 (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.im)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)) (.f64 y.im (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) y.im)) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (.f64 #s(literal -1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.im)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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))))))

eval113.0ms (1.1%)

Memory: 16.1MiB live, 196.6MiB allocated; 27ms collecting garbage
Compiler: Compiled 57 700 to 4 370 computations (92.4% saved)

prune63.0ms (0.6%)

Memory

-7.3MiB live, 131.7MiB allocated; 36ms collecting garbage

Pruning

26 alts after pruning (25 fresh and 1 done)

	Pruned	Kept	Total
New	562	23	585
Fresh	11	2	13
Picked	4	1	5
Done	0	0	0
Total	577	26	603

Accuracy

97.8%

Counts

603 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.3%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 #s(approx (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))
	55.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))))
	32.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	53.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	55.5%	#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)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	37.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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))
	36.3%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))
	34.0%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
	33.3%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
	31.3%	#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)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
▶	34.5%	#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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
	30.9%	#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)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
	26.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- ( -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))))
▶	61.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
✓	55.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
▶	44.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	47.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
	27.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
	24.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
▶	40.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
	44.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	38.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
	31.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	25.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))))
	24.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
▶	25.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Compiler

Compiled 3 300 to 1 788 computations (45.8% saved)

series374.0ms (3.8%)

Memory

-11.1MiB live, 443.4MiB allocated; 163ms collecting garbage

Counts

44 → 262

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

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

Calls

12 calls:

Time	Variable	Point
114.0ms	y.im	inf
30.0ms	x.im	inf
25.0ms	y.re	0
24.0ms	x.im	0
23.0ms	x.re	0

rewrite286.0ms (2.9%)

Memory

32.3MiB live, 303.9MiB allocated; 28ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2243	27674
0	2304	26393
0	9723	24559

Stop Event

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

Counts

306 → 353

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

Outputs
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(sin.f64 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
(cos.f64 (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.re (atan2.f64 x.im x.re))
y.re
(atan2.f64 x.im x.re)
x.im
x.re
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(literal 1 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
(.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re))
(pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)
(pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) (/.f64 y.re #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)))) y.re))
(pow.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im)))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))
(*.f64 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.f64 x.im))
(*.f64 x.im x.im)
(pow.f64 x.im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 x.im) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))))
(cos.f64 #s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.im)))
(*.f64 y.im (log.f64 x.im))
(log.f64 (pow.f64 x.im y.im))
y.im
(log.f64 x.im)
(/.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) #s(literal 3 binary64)) (pow.f64 (.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (fma.f64 (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))
#s(literal -1 binary64)
(*.f64 y.re (neg.f64 (log.f64 x.im)))
(log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.im) y.re))
(*.f64 #s(literal -1 binary64) (log.f64 x.im))
(neg.f64 (log.f64 x.im))
(-.f64 #s(literal 0 binary64) (log.f64 x.im))
(log.f64 (/.f64 #s(literal 1 binary64) x.im))
(*.f64 y.im (atan2.f64 x.im x.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))
(sin.f64 (+.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (cos.f64 (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (neg.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
(cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) #s(literal 3 binary64)) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (-.f64 (.f64 (.f64 y.re (atan2.f64 x.im x.re)) (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (.f64 y.re (atan2.f64 x.im x.re))))))
(fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))) (*.f64 y.re (atan2.f64 x.im x.re)))
(*.f64 y.im (neg.f64 (log.f64 x.re)))
(log.f64 (pow.f64 (/.f64 #s(literal 1 binary64) x.re) y.im))
(*.f64 #s(literal -1 binary64) (log.f64 x.re))
(neg.f64 (log.f64 x.re))
(-.f64 #s(literal 0 binary64) (log.f64 x.re))
(log.f64 (/.f64 #s(literal 1 binary64) x.re))
(log.f64 x.re)
(/.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (exp.f64 (*.f64 y.im (atan2.f64 x.im x.re))))
(exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sinh.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 y.im (atan2.f64 x.im x.re))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) #s(literal 3 binary64)) (pow.f64 (.f64 y.im (atan2.f64 x.im x.re)) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (fma.f64 (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
(-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))
(.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))
(*.f64 y.re (neg.f64 (log.f64 x.re)))
(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) (* (atan2 x.im x.re) y.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (atan2 x.im x.re) (atan2.f64 x.im x.re))
#s(approx x.re x.re)
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 (sqrt.f64 (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 (sqrt.f64 (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 (.f64 x.im x.im) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 5/2 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#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 (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.im) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (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 (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.im) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.im)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* y.im (atan2 x.im x.re)) (*.f64 y.im (atan2.f64 x.im x.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.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)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 x.re) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (fma.f64 y.im (log.f64 x.re) (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (neg (log x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 x.re))))
#s(approx (neg (log x.re)) (neg.f64 (log.f64 x.re)))
#s(approx (log x.re) (log.f64 x.re))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 y.re (log.f64 x.re)) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* -1 (* y.re (neg (log x.re)))) (*.f64 y.re (log.f64 x.re)))
#s(approx (* y.re (neg (log x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.im #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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 (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (neg (log x.re))) (*.f64 y.im (neg.f64 (log.f64 x.re))))
#s(approx (neg (log x.re)) (neg.f64 (log.f64 x.re)))
#s(approx (log x.re) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* -1 (* y.re (neg (log x.re)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* y.re (neg (log x.re))) (*.f64 y.re (neg.f64 (log.f64 x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.re))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 #s(literal -1 binary64) (.f64 x.re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.im #s(literal 4 binary64)) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.re #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.re #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.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))) (cos (+ (* (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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))))
#s(approx x.im x.im)
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (sqrt.f64 (*.f64 x.re x.re)))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 (sqrt.f64 (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 (sqrt.f64 (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 (.f64 x.re x.re) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (+.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 5/2 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (* y.im (log x.im)) (*.f64 y.im (log.f64 x.im)))
#s(approx (log x.im) (log.f64 x.im))
#s(approx (* -1 (* y.re (neg (log x.im)))) (*.f64 y.re (log.f64 x.im)))
#s(approx (* y.re (neg (log x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 x.im))))
#s(approx (neg (log x.im)) (neg.f64 (log.f64 x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.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)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 x.re #s(literal 4 binary64)) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.im x.im) (* x.re x.re)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (* y.im (log x.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (log x.im) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* -1 (* y.re (neg (log x.im)))) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* y.re (neg (log x.im))) (*.f64 y.re (neg.f64 (log.f64 x.im))))
#s(approx (neg (log x.im)) (neg.f64 (log.f64 x.im)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (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 (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (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 (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(literal 30 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal 90 binary64) (pow.f64 x.re #s(literal 6 binary64))))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (*.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (*.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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)))))))
#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 (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 4 binary64))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (pow.f64 x.im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.re y.re)))))) (pow.f64 x.im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (fma.f64 #s(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 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 4 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (pow.f64 x.im #s(literal 4 binary64))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.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))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 3 binary64))))))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx y.re y.re)
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.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 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.im (log.f64 x.im))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.im))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (*.f64 y.im (log.f64 x.im))) (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im)))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.im) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.im) (log.f64 x.im))))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.im))))))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (log.f64 x.re))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (log.f64 x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (cos.f64 (*.f64 y.im (log.f64 x.re))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 x.re))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (*.f64 y.im (log.f64 x.re))) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (*.f64 y.im (log.f64 x.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re)))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (log.f64 x.re)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (+.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 x.re) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (log.f64 x.re) (log.f64 x.re))))) (.f64 (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))) (log.f64 x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
#s(approx (+ (* -1 (* y.im (neg (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 (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.im) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (.f64 y.re (+.f64 (log.f64 x.re) (.f64 #s(literal -1 binary64) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* -1 (* y.im (neg (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 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (+.f64 (neg.f64 (log.f64 x.im)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.re (+.f64 (neg.f64 (log.f64 x.re)) (/.f64 (*.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re)))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.im) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.im) (log.f64 x.im)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))) (.f64 (log.f64 x.im) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.im) (log.f64 x.im))))) (.f64 (log.f64 x.im) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.im) (log.f64 x.im))) (.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 y.im y.im)
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re))))) (pow.f64 x.im y.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.im y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.im y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.im y.re)))))) (pow.f64 x.im y.re)))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.im))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re)))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))) (.f64 (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (.f64 (log.f64 x.re) (log.f64 x.re)) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))) (.f64 (log.f64 x.re) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.re) (log.f64 x.re))))) (.f64 (log.f64 x.re) (sin.f64 (*.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (log.f64 x.re) (log.f64 x.re))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 x.re) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 x.re) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re))))) (pow.f64 x.re y.re)))
#s(approx (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (atan2.f64 x.im x.re) (pow.f64 x.re y.re)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 x.re y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 x.re y.re)))))) (pow.f64 x.re y.re)))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (atan2.f64 x.im x.re)) (.f64 y.re (log.f64 x.re))))
#s(approx (+ (* -1 (* y.im (neg (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 (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.im)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (+.f64 (log.f64 x.re) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 x.re)) y.im) (atan2.f64 x.im x.re))))
#s(approx (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (neg.f64 (log.f64 x.im)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.im)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))
#s(approx (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (+.f64 (neg.f64 (log.f64 x.re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (atan2.f64 x.im x.re)) y.im))))))
#s(approx (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))) (.f64 #s(literal -1 binary64) (.f64 y.im (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (.f64 y.re (log.f64 x.re)) y.im)) (*.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re))))))

eval69.0ms (0.7%)

Memory: -1.3MiB live, 55.7MiB allocated; 21ms collecting garbage
Compiler: Compiled 39 911 to 2 831 computations (92.9% saved)

prune95.0ms (1%)

Memory

4.3MiB live, 51.4MiB allocated; 4ms collecting garbage

Pruning

29 alts after pruning (27 fresh and 2 done)

	Pruned	Kept	Total
New	305	14	319
Fresh	7	13	20
Picked	4	1	5
Done	0	1	1
Total	316	29	345

Accuracy

97.8%

Counts

345 → 29

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	55.9%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))))
	32.2%	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 #s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 #s(approx (sqrt (+ ( x.re x.re) (* x.im x.im))) (.f64 #s(literal -1 binary64) x.im))) y.im) (.f64 (atan2.f64 x.im x.re) y.re))))
	53.5%	(.f64 #s(approx (exp (- ( (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))) (cos.f64 (+.f64 (.f64 (log.f64 (hypot.f64 x.re x.im)) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))
	37.6%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))
	36.3%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))
	34.0%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
	33.3%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
	31.3%	#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)))) (.f64 (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
	28.1%	#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)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) #s(approx (exp (- ( -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.re y.re))))
▶	30.9%	#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)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
	32.9%	#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)))) (.f64 (cos.f64 #s(approx (+ ( -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re))) (.f64 y.re (+.f64 (/.f64 (.f64 y.im (log.f64 x.re)) y.re) (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))))
	39.0%	#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(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.re y.re))))
	22.7%	#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(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	45.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 (fma.f64 y.re (atan2.f64 x.im x.re) (/.f64 (PI.f64) #s(literal 2 binary64)))) (pow.f64 (sqrt.f64 #s(approx (+ ( x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	39.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (sin.f64 (+.f64 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im))) (/.f64 (PI.f64) #s(literal 2 binary64)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
✓	55.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	47.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.re x.re))) y.re)))
	40.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))) y.re)))
	35.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (.f64 x.im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))) y.re)))
	38.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	27.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 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) #s(approx (exp (- ( -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))))
	31.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) #s(approx (exp (- ( -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
▶	50.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	44.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	36.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	38.0%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (+ (* -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 x.im y.re))))
▶	25.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))))
▶	24.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
✓	25.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Compiler

Compiled 3 851 to 2 078 computations (46% saved)

series382.0ms (3.9%)

Memory

-22.8MiB live, 445.0MiB allocated; 92ms collecting garbage

Counts

53 → 592

Calls

Call 1

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

Calls

12 calls:

Time	Variable	Point
90.0ms	y.re	inf
79.0ms	y.im	0
49.0ms	x.im	-inf
22.0ms	x.re	0
14.0ms	y.re	0

rewrite444.0ms (4.5%)

Memory

63.1MiB live, 666.8MiB allocated; 156ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3650	52384
0	3721	49336
0	8276	45708

Stop Event

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

Counts

645 → 754

Calls

Call 1

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

Outputs
(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) #s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))))
(/.f64 (exp.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re)) (exp.f64 (*.f64 (atan2.f64 x.im x.re) y.im)))
(exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))
(+.f64 (cosh.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (sinh.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))))
(/.f64 (-.f64 (.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re (.f64 (atan2.f64 x.im x.re) y.im)))
(/.f64 (-.f64 (pow.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im 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 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (*.f64 (atan2.f64 x.im x.re) y.im)))))
(fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re (.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(-.f64 (.f64 (log.f64 (sqrt.f64 (fma.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 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re) (*.f64 (neg.f64 (atan2.f64 x.im x.re)) y.im))
(.f64 (log.f64 (sqrt.f64 (fma.f64 x.re x.re (.f64 x.im x.im)))) y.re)
(log.f64 (sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im))))
(pow.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.re x.re (*.f64 x.im x.im)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (fabs.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) (neg.f64 x.im))
(hypot.f64 (pow.f64 x.re #s(literal 1 binary64)) x.im)
(hypot.f64 (fabs.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (fabs.f64 x.re) (neg.f64 x.im))
(hypot.f64 (fabs.f64 x.re) x.im)
(hypot.f64 (neg.f64 x.re) (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.re) (fabs.f64 x.im))
(hypot.f64 (neg.f64 x.re) (neg.f64 x.im))
(hypot.f64 (neg.f64 x.re) x.im)
(hypot.f64 x.re (pow.f64 x.im #s(literal 1 binary64)))
(hypot.f64 x.re (fabs.f64 x.im))
(hypot.f64 x.re (neg.f64 x.im))
(hypot.f64 x.re x.im)
(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 (fabs.f64 x.re) (fabs.f64 x.re) (*.f64 x.im x.im))
(fma.f64 (neg.f64 x.re) (neg.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 (fabs.f64 x.re) (fabs.f64 x.re))
(*.f64 (neg.f64 x.re) (neg.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 (fabs.f64 x.im) (fabs.f64 x.im))
(*.f64 (neg.f64 x.im) (neg.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
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) #s(approx (cos (* y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(literal 1 binary64)
(.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(literal -1/2 binary64)
(.f64 (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 1 binary64)) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 1 binary64)))
(.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
(.f64 (.f64 y.re (atan2.f64 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
(pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (.f64 y.re (atan2.f64 x.im x.re))) #s(literal 2 binary64)))
(*.f64 y.re (atan2.f64 x.im x.re))
#s(literal 2 binary64)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
(+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
(.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))
(log.f64 (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (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)) (fabs.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (neg.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) x.re)
(hypot.f64 (fabs.f64 x.im) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (neg.f64 x.im) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im x.re)
(fma.f64 (pow.f64 x.im #s(literal 1 binary64)) (pow.f64 x.im #s(literal 1 binary64)) (*.f64 x.re x.re))
(fma.f64 (fabs.f64 x.im) (fabs.f64 x.im) (*.f64 x.re x.re))
(fma.f64 (neg.f64 x.im) (neg.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(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)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
(.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
(.f64 (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) (/.f64 y.re #s(literal 2 binary64))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) (/.f64 y.re #s(literal 2 binary64))))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) (/.f64 y.re #s(literal 2 binary64)))
(pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)
(exp.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re))
(pow.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))
(hypot.f64 (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)) (fabs.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) (neg.f64 x.re))
(hypot.f64 (pow.f64 x.im #s(literal 1 binary64)) x.re)
(hypot.f64 (fabs.f64 x.im) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (fabs.f64 x.im) (neg.f64 x.re))
(hypot.f64 (fabs.f64 x.im) x.re)
(hypot.f64 (neg.f64 x.im) (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 x.im) (fabs.f64 x.re))
(hypot.f64 (neg.f64 x.im) (neg.f64 x.re))
(hypot.f64 (neg.f64 x.im) x.re)
(hypot.f64 x.im (pow.f64 x.re #s(literal 1 binary64)))
(hypot.f64 x.im (fabs.f64 x.re))
(hypot.f64 x.im (neg.f64 x.re))
(hypot.f64 x.im x.re)
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
(.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))
(sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) (/.f64 (PI.f64) #s(literal 2 binary64))))
(cos.f64 (neg.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
(cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
(.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))
(log.f64 (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.im))
(/.f64 #s(literal 1 binary64) (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))))
(exp.f64 (*.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))
(+.f64 (cosh.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sinh.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))
(*.f64 (neg.f64 y.im) (atan2.f64 x.im x.re))
(*.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))
(neg.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 y.re) (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
(+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
(.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))
(fma.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re (.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))) y.re))
(+.f64 (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re) (.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))) y.re))
(-.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (neg.f64 y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))
(+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))
(.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))) y.re))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) y.re) (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))) y.re))
(fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))
(-.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))
(+.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 1 binary64)) (pow.f64 (atan2.f64 x.im x.re) #s(literal 1 binary64)))
(*.f64 (atan2.f64 x.im x.re) (atan2.f64 x.im x.re))
(pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
(.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))
#s(literal 1/2 binary64)
(.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 1 binary64)) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 1 binary64)))
(.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))
(pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))
(exp.f64 (.f64 (log.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 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 (sqrt.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.re (log.f64 (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 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 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.re (log.f64 (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.im x.im)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 (sqrt.f64 (.f64 x.im x.im)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.re x.re) (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.re x.re) (pow.f64 (.f64 x.im x.im) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 5/2 binary64))) (.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 x.im x.im))))))))
#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 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (cos.f64 (*.f64 y.re (atan2.f64 x.im x.re))))
#s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))))
#s(approx (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2)) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))
#s(approx (pow (* y.re (atan2 x.im x.re)) 2) (pow.f64 (*.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64)))
#s(approx (* y.re (atan2 x.im x.re)) (*.f64 y.re (atan2.f64 x.im x.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (.f64 x.re x.re) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))))))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im))))))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 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 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (*.f64 x.im x.im) #s(literal 2 binary64)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 (.f64 x.re x.re) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))))))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 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 (sqrt.f64 (.f64 x.im x.im))))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 (.f64 x.re x.re) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im 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 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (pow.f64 (*.f64 x.im x.im) #s(literal 3 binary64))))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (exp.f64 (*.f64 y.im (neg.f64 (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 (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (.f64 x.re x.re) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (.f64 x.re x.re) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (.f64 (.f64 x.re x.re) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64)))))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (.f64 x.re x.re) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))) (.f64 (.f64 x.re x.re) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (.f64 (.f64 x.re x.re) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64))))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64)))))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im))))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.re x.re) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64))))) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (.f64 (.f64 x.re x.re) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -6 binary64)))))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64))))))))))))
#s(approx (pow (atan2 x.im x.re) 2) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (*.f64 x.im x.im)))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (.f64 x.re x.re) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.im x.im)) #s(literal -4 binary64)))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (*.f64 x.im x.im)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (+.f64 (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im)))) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im))))) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (*.f64 x.im x.im))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (.f64 x.re x.re) (fma.f64 (.f64 x.re x.re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -4 binary64)) (.f64 (.f64 x.re x.re) (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (pow.f64 (.f64 x.im x.im) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.im x.im)) #s(literal -6 binary64))))))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 (sqrt.f64 (.f64 x.im x.im)) (sqrt.f64 (.f64 x.im x.im))))) (.f64 (log.f64 (sqrt.f64 (.f64 x.im x.im))) (log.f64 (sqrt.f64 (.f64 x.im x.im))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) 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 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re 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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (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 (.f64 x.re x.re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (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)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (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)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (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 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (*.f64 x.re x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.im) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.im) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.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)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.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)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.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)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (neg.f64 (log.f64 x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (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 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (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)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (neg.f64 (log.f64 x.re))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (neg.f64 (log.f64 x.re)) (neg.f64 (log.f64 x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/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 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) 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 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.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 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.im #s(literal 6 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (*.f64 x.re x.re)))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re)))))
#s(approx (cos (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.re x.re))))))
#s(approx (cos (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.re y.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.re #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 x.re x.re)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re)))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (*.f64 x.re x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (pow.f64 x.re #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (.f64 x.re x.re)) (/.f64 (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (*.f64 x.re x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.im) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.im) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (.f64 (.f64 x.re x.re) (*.f64 x.re x.re))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 #s(literal 1/2 binary64) (.f64 x.im x.im)))) (.f64 x.re x.re)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.re #s(literal 6 binary64)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re)))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.im #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 x.re x.re)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (.f64 (pow.f64 x.im #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.re #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 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 (sqrt.f64 (.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/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.re (log.f64 (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 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 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.re (log.f64 (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (-.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (sqrt.f64 (*.f64 x.re x.re)))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (-.f64 (sqrt.f64 (.f64 x.re x.re)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 x.im x.im) (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 x.im x.im) (pow.f64 (.f64 x.re x.re) #s(literal 3/2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (+.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 5/2 binary64))) (.f64 #s(literal -1/8 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 x.re x.re))))))))
#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 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (.f64 x.im x.im) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.re (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re))))))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.re (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64)))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) y.re)))))) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))) (fma.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 y.re y.re) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 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 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (fma.f64 #s(literal 1/48 binary64) (/.f64 (.f64 (.f64 y.re y.re) y.re) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.re (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (*.f64 x.re x.re) #s(literal 2 binary64)))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 (.f64 x.im x.im) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))))))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 (.f64 x.im x.im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 y.im y.im) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (fma.f64 #s(literal -1/48 binary64) (/.f64 (.f64 (.f64 y.im y.im) y.im) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))))))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 y.im (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.im (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re 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 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 y.im (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/4 binary64) (/.f64 y.im (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.im) (pow.f64 (*.f64 x.re x.re) #s(literal 3 binary64))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (.f64 x.im x.im) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64)))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (.f64 x.im x.im) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (.f64 (.f64 x.im x.im) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64)))))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (.f64 x.im x.im) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))) (.f64 (.f64 x.im x.im) (fma.f64 y.re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (fma.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (.f64 (.f64 x.im x.im) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64))))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64))))) (.f64 #s(literal 1/6 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64)))))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64)))))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re))))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.im x.im) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64))))) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (.f64 (.f64 x.im x.im) (.f64 y.re (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -6 binary64)))))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64))))))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (*.f64 x.re x.re)))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (.f64 x.im x.im) (.f64 #s(literal 1/2 binary64) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) #s(literal -4 binary64)))))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (+.f64 (/.f64 (.f64 (.f64 x.im x.im) (log.f64 (sqrt.f64 (.f64 x.re x.re)))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re)))) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re))))) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (*.f64 x.re x.re))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 (.f64 x.im x.im) (fma.f64 (.f64 x.im x.im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 2 binary64))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -4 binary64)) (.f64 (.f64 x.im x.im) (fma.f64 #s(literal 1/3 binary64) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (pow.f64 (.f64 x.re x.re) #s(literal 3 binary64))) (.f64 #s(literal -1/4 binary64) (pow.f64 (sqrt.f64 (.f64 x.re x.re)) #s(literal -6 binary64))))))) (/.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (.f64 (sqrt.f64 (.f64 x.re x.re)) (sqrt.f64 (.f64 x.re x.re))))) (.f64 (log.f64 (sqrt.f64 (.f64 x.re x.re))) (log.f64 (sqrt.f64 (.f64 x.re x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) 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 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (.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 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.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 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 x.re #s(literal 6 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im))))))))
#s(approx (+ (* x.re x.re) (* x.im x.im)) (.f64 (.f64 x.im x.im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (-.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.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 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (-.f64 (+.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.re)))))) (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (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 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (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 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im)))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (*.f64 x.im x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.im) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.im) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (neg.f64 (log.f64 x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (neg.f64 (log.f64 x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (log.f64 x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (neg.f64 (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 (neg.f64 (log.f64 x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (neg.f64 (log.f64 x.im))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (neg.f64 (log.f64 x.im)) (neg.f64 (log.f64 x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (/.f64 (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (+.f64 (/.f64 (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.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 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (-.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) 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 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))) (*.f64 y.im (atan2.f64 x.im x.re))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im)))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))
#s(approx (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (*.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im)))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (*.f64 x.im x.im))))))
#s(approx (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)))))))
#s(approx (sqrt (+ (* x.re x.re) (* x.im x.im))) (*.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 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.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 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (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 (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im)))))
#s(approx (cos (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.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 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (*.f64 x.im x.im))))))
#s(approx (cos (+ (* (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (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 (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 y.re (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (+.f64 (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (-.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im)))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (*.f64 y.re y.re) y.re)))))) (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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (/.f64 (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (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 x.im x.im))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (.f64 y.re (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.re y.re)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 y.re y.re)) (fma.f64 #s(literal 1/720 binary64) (.f64 y.re (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.re y.re) y.re))))))) (pow.f64 x.im #s(literal 6 binary64))) (+.f64 (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (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 x.im x.im))) (/.f64 (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))))) (.f64 (cos.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 x.im x.im)) (fma.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 (exp.f64 (.f64 y.im (neg.f64 (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 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))) (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (*.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im)))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (-.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (*.f64 x.im x.im))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 (+.f64 (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) (cos.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (pow.f64 x.im #s(literal 6 binary64)))))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.im (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (.f64 x.im x.im)) (/.f64 (.f64 (sin.f64 (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (fma.f64 #s(literal -1/48 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) (.f64 (.f64 y.im y.im) y.im)) (.f64 #s(literal 1/720 binary64) (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (*.f64 x.im x.im)))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.im) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.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 (sqrt (+ (* x.im x.im) (* x.re x.re))))) (fma.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.im) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 y.im (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.im) (.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (+.f64 #s(literal 1 binary64) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (.f64 (.f64 x.im x.im) (*.f64 x.im x.im))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 #s(literal 1/2 binary64) (.f64 x.re x.re)))) (.f64 x.im x.im)) (+.f64 (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/720 binary64) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))))))) (pow.f64 x.im #s(literal 6 binary64)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (fma.f64 #s(literal -1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/720 binary64) (/.f64 (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 x.re x.re) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im)))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64)))))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 y.re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (.f64 #s(literal 1/2 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (pow.f64 x.re #s(literal 6 binary64)) (.f64 #s(literal -1/360 binary64) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))))) (pow.f64 x.im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 x.im x.im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))
#s(approx (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 x.re x.re) (log.f64 (/.f64 #s(literal -1 binary64) 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 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (.f64 (pow.f64 x.re #s(literal 6 binary64)) #s(literal 120 binary64))) (pow.f64 x.im #s(literal 6 binary64))) (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) x.im)) (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re))) (fma.f64 y.re (fma.f64 #s(literal -1 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (atan2.f64 x.im x.re)))) (.f64 #s(literal 1/6 binary64) (fma.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))))))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (exp.f64 (*.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 y.re (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 #s(literal 1/2 binary64) (.f64 y.re (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (+.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 y.re (fma.f64 y.re (fma.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
#s(approx y.re y.re)
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.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))) (-.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 #s(literal 1 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 y.re (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.re (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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))) (+.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (.f64 y.re (-.f64 (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.re (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))))))) (.f64 (sin.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))) (atan2.f64 x.im x.re))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (*.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64))))))))
#s(approx (cos (* y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.re y.re) (pow.f64 (atan2.f64 x.im x.re) #s(literal 6 binary64))) (*.f64 #s(literal 1/24 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 4 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 3 binary64))))))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (-.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 #s(literal -1/2 binary64) (.f64 y.re (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (+.f64 #s(literal 1 binary64) (.f64 y.re (+.f64 (log.f64 (sqrt.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 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re)))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.re (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))) (fma.f64 y.re (fma.f64 #s(literal -1/2 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)))) (fma.f64 #s(literal 1/6 binary64) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re)))))))) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (atan2.f64 x.im x.re))))))) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (atan2.f64 x.im x.re)) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))) (.f64 (exp.f64 (.f64 y.im (neg.f64 (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))))))
#s(approx (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))))) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))))))
#s(approx (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2)))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re))))))
#s(approx (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.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 y.re (-.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (cos.f64 (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))
#s(approx (+ 1 (* -1/2 (pow (* y.re (atan2 x.im x.re)) 2))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y.re y.re)))))
#s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) y.re))))
#s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 y.re (atan2.f64 x.im x.re)))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (/.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re)))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (.f64 y.re y.re)) (/.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) y.re))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (.f64 y.re (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (/.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (/.f64 (.f64 y.im (atan2.f64 x.im x.re)) y.re)))))
#s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 #s(literal -1 binary64) (.f64 y.re (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (/.f64 #s(literal 1 binary64) y.re)))))
#s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) (/.f64 #s(literal 1 binary64) y.re)) y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))))))
#s(approx (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))) (.f64 #s(literal -1 binary64) (.f64 y.re (.f64 #s(literal -1 binary64) (+.f64 (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)))) (/.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) y.re))))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (.f64 #s(literal -1 binary64) (fma.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#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)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal -1 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (fma.f64 #s(literal 1/6 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 #s(literal 1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))))))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))
#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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))
#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)) (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re 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))) (-.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 #s(literal 1 binary64) (.f64 y.im (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 #s(literal -1/2 binary64) (.f64 y.im (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re))))))))
#s(approx (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re))) (+.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (.f64 y.im (-.f64 (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))) (.f64 #s(literal 1/6 binary64) (.f64 y.im (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (sin.f64 (.f64 y.re (atan2.f64 x.im x.re)))))))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))))
#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (sin (+ (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)) (/ (PI) 2)))) (fma.f64 y.im (fma.f64 #s(literal -1 binary64) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 #s(literal 1/2 binary64) (fma.f64 (cos.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (.f64 (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))) y.re))) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))) (.f64 (atan2.f64 x.im x.re) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re 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 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.im (atan2.f64 x.im x.re)))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 2 binary64)) (atan2.f64 x.im x.re))))))))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) #s(literal 2 binary64)))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 #s(literal 1/24 binary64) (.f64 (.f64 y.im y.im) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re)))) #s(literal 4 binary64))))))))
#s(approx (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64)) (.f64 (.f64 y.im y.im) (fma.f64 #s(literal -1/720 binary64) (.f64 (.f64 y.im y.im) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 6 binary64))) (.f64 #s(literal 1/24 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 4 binary64)))))))))
#s(approx (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 #s(literal 1/2 binary64) (*.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64))))))))
#s(approx (exp (neg (* y.im (atan2 x.im x.re)))) (+.f64 #s(literal 1 binary64) (.f64 y.im (fma.f64 #s(literal -1 binary64) (atan2.f64 x.im x.re) (.f64 y.im (fma.f64 #s(literal -1/6 binary64) (.f64 y.im (pow.f64 (atan2.f64 x.im x.re) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)))))))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 y.im (-.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))
#s(approx (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im)) (.f64 #s(literal -1 binary64) (.f64 y.im (.f64 #s(literal -1 binary64) (-.f64 (/.f64 (.f64 y.re (log.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))))) y.im) (atan2.f64 x.im x.re))))))

eval174.0ms (1.8%)

Memory: -14.3MiB live, 342.5MiB allocated; 131ms collecting garbage
Compiler: Compiled 94 266 to 6 127 computations (93.5% saved)

prune92.0ms (0.9%)

Memory

8.7MiB live, 144.8MiB allocated; 20ms collecting garbage

Pruning

32 alts after pruning (30 fresh and 2 done)

	Pruned	Kept	Total
New	761	23	784
Fresh	15	7	22
Picked	5	0	5
Done	0	2	2
Total	781	32	813

Accuracy

97.8%

Counts

813 → 32

Alt Table

Click to see full alt table

Status	Accuracy	Program
	65.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))) #s(approx (cos (* y.re (atan2 x.im x.re))) #s(literal 1 binary64))))
	36.3%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal 1/2 binary64) (PI.f64) (fma.f64 y.im (log.f64 (sqrt.f64 (.f64 x.im x.im))) (.f64 y.re (atan2.f64 x.im x.re)))))))
	34.0%	#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)))) (.f64 (exp.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re)))) (.f64 y.im (atan2.f64 x.im x.re)))) (sin.f64 (fma.f64 #s(literal -1 binary64) (.f64 y.im (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal 1/2 binary64) (PI.f64) (.f64 y.re (atan2.f64 x.im x.re)))))))
	24.1%	#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)))) (.f64 (cos.f64 #s(approx ( y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re))))) (.f64 #s(literal -1 binary64) (.f64 y.im (log.f64 (/.f64 #s(literal -1 binary64) x.im)))))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re))))))
	44.9%	#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)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	35.1%	#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)))) (.f64 #s(approx (cos ( y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.im (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re))))) #s(literal 2 binary64))))) (exp.f64 (neg.f64 (.f64 y.im (atan2.f64 x.im x.re))))))
	22.7%	#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(approx (* (cos (+ (* -1 (* y.im (neg (log x.re)))) (* y.re (atan2 x.im x.re)))) (exp (- (* -1 (* y.re (neg (log x.re)))) (* y.im (atan2 x.im x.re))))) (.f64 (cos.f64 (.f64 y.im (log.f64 x.re))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	26.0%	#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(approx (* (cos (* y.im (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (exp (neg (* y.im (atan2 x.im x.re))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.im (atan2.f64 x.im x.re))))))
✓	55.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 (sqrt.f64 (fma.f64 x.im x.im (*.f64 x.re x.re))) y.re)))
	38.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 (.f64 y.re (atan2.f64 x.im x.re))) (pow.f64 #s(approx (sqrt (+ (* x.im x.im) (* x.re x.re))) (*.f64 #s(literal -1 binary64) x.im)) y.re)))
	27.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 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) #s(approx (exp (- ( -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (pow.f64 x.im y.re))))
	31.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 (cos.f64 #s(approx (+ ( -1 (* y.im (neg (log x.im)))) (* y.re (atan2 x.im x.re))) (.f64 y.im (log.f64 x.im)))) #s(approx (exp (- ( -1 (* y.re (neg (log x.im)))) (* y.im (atan2 x.im x.re)))) (exp.f64 (neg.f64 (*.f64 y.im (atan2.f64 x.im x.re)))))))
	50.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	36.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) (pow.f64 (sqrt.f64 #s(approx (+ (* x.im x.im) (* x.re x.re)) (*.f64 x.im x.im))) y.re)))
	42.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (pow.f64 (sqrt.f64 (*.f64 x.re x.re)) y.re))))
	18.2%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (pow.f64 (.f64 y.re (atan2.f64 x.im x.re)) #s(literal 2 binary64))))) #s(approx (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re) (exp.f64 (.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
	60.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) (.f64 #s(approx (cos ( y.re (atan2 x.im x.re))) #s(literal 1 binary64)) (pow.f64 (hypot.f64 x.im x.re) y.re)))
	14.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (+ (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) (* y.re (+ (* -1/2 (pow (atan2 x.im x.re) 2)) (* 1/2 (pow (log (sqrt (+ (* x.im x.im) (* x.re x.re)))) 2))))))) (.f64 (.f64 y.re y.re) (fma.f64 #s(literal -1/2 binary64) (pow.f64 (atan2.f64 x.im x.re) #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) #s(literal 2 binary64))))))))
	13.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))))))))
	12.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))))))))
	13.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))))))))
	5.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))))
	10.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
	4.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.re x.re) (.f64 x.re x.re)) y.re) (.f64 (.f64 x.im x.im) (.f64 x.im x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (.f64 x.im x.im)))))))))
	7.7%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (neg.f64 (log.f64 x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
	6.3%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 x.im x.im) (.f64 x.im x.im)) y.re) (.f64 (.f64 x.re x.re) (.f64 x.re x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (.f64 x.re x.re)))))))))
	12.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.re))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.im x.im) y.re) (*.f64 x.re x.re))))))))
	8.5%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 y.re (log.f64 (/.f64 #s(literal -1 binary64) x.im))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 x.re x.re) y.re) (*.f64 x.im x.im))))))))
	25.1%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.re x.re))))))))
	21.8%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (+.f64 #s(literal 1 binary64) (.f64 y.re (log.f64 (sqrt.f64 (.f64 x.im x.im))))))))
	24.4%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(approx (+ 1 (* y.re (log (sqrt (+ (* x.im x.im) (* x.re x.re)))))) (.f64 y.re (+.f64 (log.f64 (sqrt.f64 (fma.f64 x.im x.im (.f64 x.re x.re)))) (/.f64 #s(literal 1 binary64) y.re))))))
✓	25.9%	#s(approx (* (exp (- (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.re) (* (atan2 x.im x.re) y.im))) (cos (+ (* (log (sqrt (+ (* x.re x.re) (* x.im x.im)))) y.im) (* (atan2 x.im x.re) y.re)))) #s(approx (* (cos (* y.re (atan2 x.im x.re))) (pow (sqrt (+ (* x.im x.im) (* x.re x.re))) y.re)) #s(literal 1 binary64)))

Compiler

Compiled 7 917 to 1 796 computations (77.3% saved)

regimes180.0ms (1.8%)

Memory

17.9MiB live, 252.5MiB allocated; 122ms collecting garbage

Counts

79 → 2

Calls

Call 1

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

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

Calls

5 calls:

69.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))))
32.0ms	y.im
24.0ms	x.re
24.0ms	x.im
23.0ms	y.re

Results

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

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes105.0ms (1.1%)

Memory

5.8MiB live, 194.4MiB allocated; 22ms collecting garbage

Counts

74 → 3

Calls

Call 1

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

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

Outputs

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

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

Calls

5 calls:

22.0ms	y.re
21.0ms	x.im
20.0ms	x.re
18.0ms	y.im
18.0ms	(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))

Results

Accuracy	Segments	Branch
72.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))))`
75.2%	3	`x.re`
77.9%	4	`y.im`
77.9%	3	`x.im`
79.3%	3	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes56.0ms (0.6%)

Memory

-11.3MiB live, 126.4MiB allocated; 9ms collecting garbage

Counts

59 → 4

Calls

Call 1

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

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

Calls

3 calls:

17.0ms	y.re
16.0ms	x.im
15.0ms	y.im

Results

Accuracy	Segments	Branch
77.9%	4	`y.im`
72.1%	2	`x.im`
67.6%	2	`y.re`

Compiler

Compiled 3 to 12 computations (-300% saved)

regimes15.0ms (0.1%)

Memory

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

Counts

42 → 4

Calls

Call 1

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

Calls

1 calls:

11.0ms

y.im

Results

Accuracy	Segments	Branch
76.8%	4	`y.im`

Compiler

Compiled 1 to 4 computations (-300% saved)

regimes29.0ms (0.3%)

Memory

-20.5MiB live, 32.6MiB allocated; 4ms collecting garbage

Counts

29 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

8.0ms	x.re
8.0ms	y.im

Results

Accuracy	Segments	Branch
71.4%	3	`x.re`
74.9%	3	`y.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes39.0ms (0.4%)

Memory

-3.9MiB live, 43.2MiB allocated; 2ms collecting garbage

Counts

14 → 1

Calls

Call 1

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

Outputs

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

Calls

5 calls:

22.0ms	y.re
4.0ms	x.re
4.0ms	y.im
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
60.7%	1	`y.re`
60.7%	1	`x.re`
60.7%	1	`x.im`
60.7%	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))))`
60.7%	1	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes18.0ms (0.2%)

Memory

-5.6MiB live, 39.2MiB allocated; 4ms collecting garbage

Counts

9 → 3

Calls

Call 1

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

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
27.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))))`
28.2%	2	`x.re`
29.0%	2	`x.im`
32.0%	2	`y.re`
33.7%	3	`y.im`

Compiler

Compiled 41 to 35 computations (14.6% saved)

regimes5.0ms (0.1%)

Memory

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

Counts

6 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

2 calls:

2.0ms	y.im
2.0ms	y.re

Results

Accuracy	Segments	Branch
30.8%	2	`y.re`
33.4%	3	`y.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes4.0ms (0%)

Memory

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

Outputs

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

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

Calls

2 calls:

2.0ms	y.im
2.0ms	y.re

Results

Accuracy	Segments	Branch
30.8%	2	`y.re`
31.6%	3	`y.im`

Compiler

Compiled 2 to 8 computations (-300% saved)

regimes10.0ms (0.1%)

Memory

-23.5MiB live, 22.6MiB allocated; 2ms collecting garbage

Accuracy

Total -11.7b remaining (-24.7%)

Threshold costs -11.7b (-24.7%)

Counts

3 → 1

Calls

Call 1

Inputs

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

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

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

Outputs

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

Calls

5 calls:

3.0ms	x.re
2.0ms	y.im
2.0ms	y.re
1.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
25.9%	1	`(.f64 (exp.f64 (-.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.re) (.f64 (atan2.f64 x.im x.re) y.im))) (cos.f64 (+.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 x.re x.re) (.f64 x.im x.im)))) y.im) (*.f64 (atan2.f64 x.im x.re) y.re))))`
25.9%	1	`x.re`
25.9%	1	`x.im`
25.9%	1	`y.im`
25.9%	1	`y.re`

Compiler

Compiled 41 to 35 computations (14.6% saved)

bsearch37.0ms (0.4%)

Memory

28.4MiB live, 78.4MiB allocated; 5ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
34.0ms	2.322781057512168e+78	1.0532483040901206e+80

Samples

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

Compiler

Compiled 551 to 359 computations (34.8% saved)

Precisions

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

adjust: 6.0ms (24.1% of total)

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

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

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

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

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

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

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

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

bsearch1.0s (10.6%)

Memory

-75.7MiB live, 180.5MiB allocated; 1.4s collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
32.0ms	1.1613368911667599	9652287.258365508
37.0ms	-3.5876199102485536e-9	-2.396703814855646e-23

Samples

31.0ms	94×	1	valid
23.0ms	210×	0	valid

Compiler

Compiled 1 654 to 1 105 computations (33.2% saved)

Precisions

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

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

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

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

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

adjust: 4.0ms (9% of total)

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

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

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

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

bsearch119.0ms (1.2%)

Memory

-75.5MiB live, 191.8MiB allocated; 21ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
33.0ms	2.0084796266405666e-72	5.463110859539243e-61
32.0ms	-958462.782830181	-5.784408053065448
46.0ms	-1.8257480027207786e+50	-2.867966491117636e+49

Samples

37.0ms	126×	1	valid
33.0ms	274×	0	valid

Compiler

Compiled 2 911 to 1 737 computations (40.3% saved)

Precisions

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

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

ival-mult!: 11.0ms (19.1% of total)

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

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

ival-atan2: 7.0ms (12.1% of total)

adjust: 5.0ms (8.7% of total)

ival-exp: 4.0ms (6.9% of total)

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

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

bsearch54.0ms (0.5%)

Memory

5.5MiB live, 97.8MiB allocated; 5ms collecting garbage

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
14.0ms	2.0084796266405666e-72	5.463110859539243e-61
34.0ms	-5.784408053065448	-3.127932378418668e-15
2.0ms	-1.8257480027207786e+50	-2.867966491117636e+49

Samples

23.0ms	179×	0	valid
13.0ms	45×	1	valid

Compiler

Compiled 3 080 to 1 831 computations (40.6% saved)

Precisions

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

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

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

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

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

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

adjust: 2.0ms (6.9% of total)

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

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

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

bsearch34.0ms (0.3%)

Memory

23.2MiB live, 69.2MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	2.0084796266405666e-72	5.463110859539243e-61
29.0ms	-531001752897774500.0	-45198412187965.234

Samples

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

Compiler

Compiled 1 804 to 1 085 computations (39.9% saved)

Precisions

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

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

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

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

adjust: 2.0ms (10.4% of total)

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

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

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

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

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

bsearch33.0ms (0.3%)

Memory

-32.0MiB live, 66.4MiB allocated; 5ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	2.0084796266405666e-72	5.463110859539243e-61
29.0ms	-2.3203969388445815e-31	-3.8420550635289064e-38

Samples

14.0ms	118×	0	valid
8.0ms	26×	1	valid

Compiler

Compiled 2 514 to 1 275 computations (49.3% saved)

Precisions

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

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

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

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

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

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

adjust: 1.0ms (6.2% of total)

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

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

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

bsearch4.0ms (0%)

Memory

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

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
2.0ms	2.0084796266405666e-72	5.463110859539243e-61
2.0ms	-2.3203969388445815e-31	-3.8420550635289064e-38

Compiler

Compiled 2 624 to 1 315 computations (49.9% saved)

bsearch32.0ms (0.3%)

Memory

16.7MiB live, 63.1MiB allocated; 2ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
29.0ms	9.160579298880475e+56	1.994079741241397e+58

Samples

18.0ms	65×	1	valid
5.0ms	47×	0	valid

Compiler

Compiled 992 to 499 computations (49.7% saved)

Precisions

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

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

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

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

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

adjust: 2.0ms (10.6% of total)

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

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

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

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

derivations301.0ms (3.1%)

Memory

-1.1MiB live, 383.9MiB allocated; 17ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 1 519 to 145 computations (90.5% saved)

preprocess101.0ms (1%)

Memory: -6.5MiB live, 278.9MiB allocated; 15ms collecting garbage
Compiler: Compiled 1 556 to 164 computations (89.5% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze465.0ms (4.7%)

sample3.7s (37.1%)

preprocess40.0ms (0.4%)

series248.0ms (2.5%)

rewrite213.0ms (2.2%)

eval49.0ms (0.5%)

prune51.0ms (0.5%)

series421.0ms (4.3%)

rewrite392.0ms (4%)

eval113.0ms (1.1%)

prune63.0ms (0.6%)

series374.0ms (3.8%)

rewrite286.0ms (2.9%)

eval69.0ms (0.7%)

prune95.0ms (1%)

series382.0ms (3.9%)

rewrite444.0ms (4.5%)

eval174.0ms (1.8%)

prune92.0ms (0.9%)

regimes180.0ms (1.8%)

regimes105.0ms (1.1%)

regimes56.0ms (0.6%)

regimes15.0ms (0.1%)

regimes29.0ms (0.3%)

regimes39.0ms (0.4%)

regimes18.0ms (0.2%)

regimes5.0ms (0.1%)

regimes4.0ms (0%)

regimes10.0ms (0.1%)

bsearch37.0ms (0.4%)

bsearch1.0s (10.6%)

bsearch119.0ms (1.2%)

bsearch54.0ms (0.5%)

bsearch34.0ms (0.3%)

bsearch33.0ms (0.3%)

bsearch4.0ms (0%)

bsearch32.0ms (0.3%)

derivations301.0ms (3.1%)

preprocess101.0ms (1%)

end0.0ms (0%)

Profiling